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************************************************************************* 

* onze nieuwe VOORJAAR '88 CATALOGUS is nu uit. Stuur ons een kaartje * * 

* met je naam en adres + de vermelding 'MSX Gids’ * 

* en we sturen hem GRATIS toe. Of kom hem afhalen in de winkel. * 

************************************************************************* 


in BELGIE 

zijn al onze artikelen verkrijgbaar bij 
Het Computerwinkeltje pvba, 

M Sabbestraat 39, B-2800 MECHELEN 
telefoon (015) 206 645 
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MSX Truuks en Tips deel 8 . 25,15 

Werken met Bestanden in MSX BASIC ... 45 

Handboek MSX . 79,50 

BASICODE-3 incl cassette MSX/MSX2 27,50 
Grafische Experimenten voor MSX .. 34,50 

MSX BASIC (Sickler) . 30,75 
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MSX Programmeren in Machinetaal .. 32,50 
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Machinetaal voor MSX Computers ... 39,50 
Tips en Trucs voor de MSX Computer 49,90 
MSX LOGO Spelenderwijs . 27,50 
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Zakboekje Z-80 . 25,25 

Machinetaal Z80 - Gestruct . 39,50 

Microsoft BASIC - MSX BASIC ... 69 

De Programmeertaal C . 25 
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* Speciale MSX boeken aanbieding * 

* MSX EXPOSED . f 5,- * 

* normale prijs f 39,- * 

*********************************** 

MSX nederlands NIEUW! 
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ACTUELE MSX SOFTWARE (t=tape/d=disk/c=cartridge) 


MSX-2 Software disk, cart 
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onder MSX-DOS. 

Tasword MSX-2 ........ 149 

nederlandse tekstverw. 

Sne1faktuur MSX-2 _ 149 
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Kastan - database .... 149 
Fastan fakturering 300,50 

Fistan . 300,50 

financiële administratie 

*USAS konami . cart 79 

Metal Gear konami cart 79 
The Chess Game MSX-2 49,90 

Chopper II . 49,90 

Vampire Killer .. cart 79 

MSX Nuttig : 

Musix (composer) . t 14,90 
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Tasword nederlands .. t 95 
Tasword MSX engels... t 65 
Aacko Desk ..(3.5"). d 179 
database+tekstverwerker 
SuperKasboek disk .. d 149 
voor privé boekhouding 
en vereniging. 

Werken met MSX tape t 40 

MSX Utilities : 


TURBO 5000 . cart 119 
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back-up, disk monitor, 
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MSX programmeertalen : 
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Delta BASIC ... tape t 89 

Hisoft DevPac . t 79 

Hisoft DevPac80 2.0 d 165 

*Turbo Pascal engels d 195 
Hisoft Pascal 80 ... d 165 

Hisoft C++ . d 165 

Flash (dis)Assembler d 119 


MSX Adventures 
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Knight Ore . t 59 

bevat de volgende level9 
adventures: 

Loosed Ore, A Kind of 
Magie, Hordes of the 
Mountain King 
Jewels of Darkness .. t 65 

Silicon Dreams. t 59 


Denk en bordspelen 

Bridge . t 55 

The Chess Game 1 . t 29,90 


*NASHUA diskettes per 10 * 

5" single sided. 15 

3.5" single sided .. 42,50 
3.5" doublé sided ..... 45 


MSX Sportsimulaties 

*BMX simulator . t 10 

Konami Boxing .. c 65 

*F-1 SPIRIT . c 79 

de nieuwste Konami 
mega ROM met LSI 
Custom Sound Chip. 

Football Manager .... t 36 

Konami Football .c 65 

Formula 1 Simulator . t 10 
*Gary Lineker's Soccer t 32 
International Karate t 15 
Speedking motorrace . t 10 

Wint er games . t 39 

Yie Ar Kung Fu II ... c 69 

MSX F1ightsimulators 
*747 Flightsimul. . t 39,90 
*747 Flightsimul .. d 49,90 

Chopper I. t 29,90 

Chopper I . d 39,90 

*E 1 ite . t 59,00 

*E1ite disk_... d 69,00 

Flight Deck. t 29,90 

Flight Deck.d 39,90 

*F1ight Pack 1 .... t 29,90 
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*F1ight Pack 1 disk d 39,90 
Space Shuttle .... t 39 

MSX arcade games: 

Aliens (vd film) .... t 39 

Arkanoid. t 36 

Army Moves . t 36 

Batman .. t 36 

*Beach Head.t 29,90 


MSX Arcade Games: 

Computer Hits 10 -3 . t 39 
10 msx games, oa: 

Buzz Off, Psychedelia, 
Slapshot, 3D Knockout, 
Mutant Monty, Turmoil, 
Time Bandits, Eddie Kidd 

Dawn Patrol . t 34,90 

*Deathwish III . t 32 

Dota disk . d 39,90 

Feud . t 10 

Fire Hawk. t 10 

Flash Gordon. t 15 

*Galaxians . t 15 

Game Master Konami .. c 75 
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Head over Heels ..... t 36 

*Hyperralley . c 65 

Knightmare . c 65 

*Livingstone . t 36 

The Living Daylights t 39 

*Mappy . t 15 

*Mask II . t 39 

*Masters of Universe . t 32 

Maze of Gal ious. c 75 

MSXtra . t 35 

Nemesis - konami .... c 65 
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winkel open van woensdag t/m zaterdag tussen 11.00 en 17.00 (maandag/dinsdag gesloten) - alle prijzen inclusief BTW 
verzendkosten f 6^- per bestelling - vraag onze nieuwe VOORJAAR '88 CATALOGUS aan. 
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COLOFON 
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VOORWOORD 


HET OMSLAG 

d v ZB “ aan T d T afbee,dinfl van een van de J »P an « rompack» dia we de afgelopen periode 

binnen hebben gekregen. In Japan staat de kwaliteit van de games op een zeer hoog peil en de meeste 

MSK veel hekVnri t »i ? L ^ V °° r ^ A “ l9a “ d ® Atari ST ’ Ook vinden " B ln ^pan voor de 
. r «1 b v k ." d f t tB S I0a s d e hler voor b - v ‘ dB pc of de A PP le verkrijgbaar zijn. Alle 4 de Ultima’s zijn 
daar al verkrijgbaar en ook rollenspellen als Wizardrg zijn in diverse versies aanwezig. J 

totTnlfr 4, T rvan d . B afb ? ldingen ° P het om8la 0 te zien 2i J"> houdt en» el vele weken bezig -vaak 

diep in de nacht- en als je dan met dit soort spellen bezig bent dan zijn sommige Konami's een fluitje 

van een cent. J 


™„i d S BZe fraaie r ?“ pa , cks al,Bmaal voor de MSH - 2 - G » ,u kkig krijgen we binnenkort weer enkele 
exemplaren binnen en wie snel is (en veel geld heeft) kan dan op de beurs proberen er een te bemachtigen. 
Het is jammer van die hoge prijzen (bij aankomst in Nederland komen er nog invoerrechten en BTW op de 

S k r? V0 ° r BCht ! fanatBn ’ Z0a,S Hi J dat hler 00k 2 i J"> laI het ^drag niet zo’n bezwaar zijn, 
want je krijgt er een uniek stukje top-software voor terug. Uiteraard houden we zelf ook enkele 

ZSTJJtt Gulden Hga«n!° P,IS " ^ ' U '" — - 

DE 'BEURS’ 

"Ï® bBUrS ““f ‘ net a,8V0rl S J aa /- een gezellige MSK-dag: gratis entree, goedkope consumpties en 
behoorlijk wet aanbiedingen en koopjes. Jammer genoeg konden we dit jaar niet gelijktijdig met de beurs 
van de INFO zijn, zodat sommige mensen 2 keer een tripje naar Amsterdam moeten maken. 

KONAMI CLUB 

Gelukt! Met de gegevens, zoals we die in de vorige Gids hebben gemeld, is het nu gelukt om een 
wervolg’et* P V “ n ^ K ° naB,i ° ^ tB krij9Bn ' hebben hat eerSte krant J e binnen en de accessoires zullen 

DESK TOP PUBUSHER 

Steeds mooier worden de programma’s in de Gids. In dit nummer een fraai desk top programma en ook voor 
deze”kw^eit U “^n hBbb8n ^ " BBr 660 PMr t0PPBr8 ,n V00rraad ’ Ho P enll J k Wijven we inzendingen van 

BELLEN OVER SPELLEN 

Nadat }“ de sof twarerubriek van het vorige nummer enkele oproepen hadden gestaan en omdat we een spel 
u hadden gespeeld zijn we overstroomd met tips en telefoontjes met vragen over spellen. De tips worden 
uiteraard in het blad behandeld, maar dat we een spel uitgespeeld hebben wil nog niet zeggen.dat we alles 
" e * an T aUe „ s ° ftware die in de Gids beschreven staat. Sommigen schijnen dat wel te denken en we 
hebben dan ook de meest uiteenlopende vragen gehad over zowat alle spellen -vooral Konami’s- die in 
omloop zijn. Tevergeefse moeite, want dat weten we echt niet; het heeft dus weinig zin om ons met vraqen 
over spellen te bellen of te schrijven. Sommige lezers kunnen met de spellen van Konami in het geheel niet 
overweg en bellen bij elk kamertje op wat ze moeten doen. Tegen deze 'spelers' kunnen we kort zijn: niet 
meer bellen, maar gewoon een eenvoudiger spel kopen. 


Alfred. 
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PRINT OFFICE 


ALLEEN MSK-2 MET DISKDRIVE! 

Met dit programma is het mogelijk om een tekst te 
maken met speciale, al dan niet zelf ontworpen, 
karakters. Hierdoor zijn resultaten mogelijk die met 
een normale tekstverwerker niet te bereiken zijn. 
Het programma is bijvoorbeeld goed te gebruiken 
voor het maken van briefhoofden of wenskaarten. 
Het nu volgende gedeelte is bedoeld voor degenen die 
het programma gaan intgpen. Voor de gebruiker is er 
een aparte handleiding. 

HET PROGRAMMA 
Het programma is alleen geschikt voor MSH2 met 
diskdrive en bestaat uit een BASIC- programma en 
drie geheugenfiles die vanuit dit BASIC- programma 
worden geladen. De drie geheugenfiles, dit zijn files 
die met BSAVE gesaved zijn en met BLOAD geladen 
kunnen worden, worden gemaakt door middel van drie 
BASIC -programma’s, DEEL1, DEEL2 en DEEL3, die 
vrijwel geheel bestaan uit dataregels. In DEEL1 staan 
de data s van de voorgeprogammeerde karaktersets. 
Dit gedeelte is niet echt noodzakelijk voor de goede 
WBrking van het programma en hoeft dus niet perse 
ingetikt te worden, men mist dan echter wel de 
voorgeprogrammeerde karaktersets. DEEL2 en DEEL3 
zijn wel van belang en moeten dus wel ingetgpt 
worden. Het programma maakt niet zozeer gebruik 
van de extra MSX2- mogelijkheden maar wel van het 
veel grotere VideoRAM. Dit VRAM is onder screen 0 
en screen 1 zeer geschikt voor de opslag van data. 
Dat het programma alleen met diskdrive kan werken 
komt door het feit dat alleen bij diskgebruik het 
VRAM met bsave gesaved kan worden. Er schuilt 
hierbij echter wel een addertje onder het gras, maar 
daarover straks meer. 

PRINTERCODES 

Bij het printen van de tekst maakt het programma 
gebruik van de grafische printmode, ook wel de 'bit 
image mode genoemd. De codes voor deze printmode 
zijn voor iedere printer of printerstandaard anders, 
vandaar dat men zelf de codes in het programma 
moet verwerken. De codes die in het programma 
staan zijn geschikt voor de PHILIPS VW0030, PHILIPS 
NMS1431 en de SEIKOSHA SP1000MX. Als men niet over 
een van de bovengenoemde printers beschikt moeten 
de printercodes worden ingevuld in de strings El$ 
tot en met E7$. Deze strings zijn te vinden vanaf 
regel 330. De strings moeten de volgende codes 
bevatten: 

El$ 8 tekens in grafische mode. 

E2I Regelopvoer 1/S inch. 

E3$ Regelopvoer 1/8 inch. 

E4$ 512 tekens in grafische mode 
(minimaal 72 dots/inch). 

E5$ Reset printer. 

ESI 512 tekens in grafische mode 
(minimaal 136 dots/inch). 

Bij het printen kan blijken dat de letters 
ondersteboven geprint worden, in dit geval moet het 
KEM-statement in regel 430 verwijderd worden. Het 
is belangrijk dat de printer bij het gebruik van 
kettingformulieren op de juiste papierlengte is 
ingesteld. Als men gebruik maakt van 11 inch 
kettingformulieren en de printer is ingesteld op 12 
inch dan gaat het bij het printen van meerdere 
pagina’s fout. Het programma kan de tekstpagina’s 
op twee formaten afdrukken, namelijk normaal en 


smal. In het laatste geval komen er twee pagina's 
naast elkaar op papier. Dit is alleen mogelijk bij de 
wat betere printers die ook over C0NDEN3ED- 
beschikken. 


schrift 


HET INVOEREN VAN HET PROGRAMMA 
Bij het invoeren van het programma kan men het 
best als volgt te werk gaan: 

Tik het programma PRINT OFFICE foutloos in met 
behulp van het listingcontrole- programma. Pas de 
printercodes aan. SAVE het programma. 

Tik het programma DEEL1 in en controleer het 
gedeelte dat de data’s inleest goed. SAVE het 
programma onder de naam DEEL1.BAS, en RUN het 
vervolgens. 

Als blijkt dat er fouten in de data's zitten deze 
fouten verbeteren en het programma net zo lang 
RUNnen totdat er geen fouten meer voorkomen. 

BSAVE de geheugenfile DEEL1, met de instructie die 
op het scherm geprint wordt. 

SAVE opnieuw het BASIC-programma, dat nu vrijwel 
zeker foutloos is. onder de naam DEEL1.BAS. 

Tik het programma DEEL2 in en controleer het 
gedeelte dat de data's inleest goed. SAVE het 
programma onder de naam DEEL2.BAS, en RUN het 
vervolgens. 

Als blijkt dat er fouten in de data’s zitten deze 
fouten verbeteren en het programma net zo lang 
RUNnen totdat er geen fouten meer voorkomen. 

B5AVE de geheugenfile DEEL2, met de instructie die 
op het scherm geprint wordt. 

SAVE opnieuw het BASIC-programma, dat nu vrijwel 
zeker foutloos is, onder de naam DEEL2.BAS. 

Tik het programma DEEL3 in en controleer het 
gedeelte dat de data’s inleest goed. SAVE het 
programma onder de naam DEEL3.BAS, en RUN het 
vervolgens. 

Als blijkt dat er fouten in de data’s zitten deze 
fouten verbeteren en het programma net zo lang 
RUNnen totdat er geen fouten meer voorkomen. 

BSAVE de geheugenfile DEEL3, met de instructie die 
op het scherm geprint wordt. 

SAVE opnieuw het BASIC-programma, dat nu vrijwel 
zeker foutioos is, onder de naam DEEL3.ÖAS. 

De BASIC-programma’s DEEL1, DEEL2 en DEEL3 zijn 
van een ingebouwde data-controle voorzien. Deze 
controle biedt geen waterdichte garantie maar zal in 
de meeste gevallen wel volstaan. Als het gehele 
programma is ingevoerd en de verschillende files op 
diskette staan kan het hoofdprogramma geRUNd 
worden. Hierna kunnen ook de printfuncties getest 
worden en de printercodes zonodig worden veranderd. 

TRUUK 


Zoals gezegd kan met het BSAVE-statement een 
gedeelte van het VRAM worden gesaved. Bij screen D 

dit echter a,,een voor de onderste 
ion VKflM. In dit programma wordt dit alsvolot 

°P 9 e l 03 £Ln a ï,™ or het BSflVE - BLOAD-statement 
staat POKE fcHFCAF,7 (FCAFh is de sgsteemvariable 
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SCRMOD, SCREENMODE). Hierdoor gaat de computer er 
vanuit dat screen 7 actief is, en kan wel het gehele 
n. n”, gesaved of geladen worden. Vlak na BSAVE- of 
BLOAD- statement staat een POKE 4HFCAF.1 om alles 
weer te herstellen. Deze truuk kan zonder meer in 
eigen programma’s gebruikt worden. 

Veel succes!! 

Martin van der Graaff. 

(Red. De handleiding bij dit programma is gemaakt 
met dit programma zelf) 


10 REM PRINT OFFICE 

20 REM voor MSX2 met diskdrive 

30 REM 

40 REM Martin van der Graaff 
50 REM 

60 REM <c> 1988 MSX-Gids 
70 REM Lelystad 
80 REM 

90 REM initialisatie 

100 CLS:BASE<5)=6144:BASE(6>=8128 

110 BASE(7)=0:BASE(8)=6912:BASE(9)=14336 

120 CLEAR800, &HB900:DEFINTA-Z 

130 SC=PEEK(&HFCAF):VK=PEEK(&HF3E9):AK=PEE 

K(&HF3EA):BK=PEEK(&HF3EB):VI=PBEK(&HF3B0): 

FT=PEEK(&HF3DE) 

140 CLS:KEYOFF: SCREEN0 ,,0 
150 WIDTH80:COLOR1, 11, 11 
160 BLOAD"DEEL1”,-4096 
170 BLOAD”DEEL2” 

180 DEFUSR=&HCD61: DUMY=USR (0): SCREEN1: VIDT 
H32 

190 DEFUSR=&HCC90:VDP(4)=2: LOCATE2, 10: DUMY 
=USR(0) 

200 PRINT” rhl-H-l-l-l-H-l-l-l-l-l-l-l-hhl-M-M-hh 
| QeaêiêêOFFICEl 1BY1 MARTI Ni i f | Mèicëï V2 

®-mi-miiiVDüif ” : 

210 PRINT” MiiiiiiüiiiiiiiiiiGRAAFF-f- 

220 BLOAD”DEBL3” 

230 DEFUSR0=&HD500:DEFUSR1=&HD55A 

240 DEFUSR2=&HD7CD:DEFUSR3=&HD845 

250 DEFUSR4=&HD88C: DEFUSR5=&HD8D7 

260 DEFUSR6=&HCC90:DEFUSR7=&HD9A1 

270 FO=8:KN=64:GG=1: KL=1: YP=8 

280 POKE&HDDCB,8:POKE&HDDCC,64: POKE&HDDCE, 

1:POKE&HDDCF,1:POKE&HDDD0,1:POKE&HDDD1,1:P 

OKE&HDDD2,0:POKE&HDDD3,64:PQKE&HDDD4 1: POK 

E&HDDD8,2: POKE&HDDD9,0:POKE&HDDDA,0: POKE&H 

FBB0 ,1:P0KE&HF3B1,25 

290 FORI=lTO10:KEYI,CHR$(239+I):NEXT 

300 ONSTOPGOSUB2950 

310 ONERRORGOTO3030 

320 REM 

330 REM printercode’s (VW0030) 

340 E1$=CHR$(27)+”G0720008” 

350 E2$=CHR$(27)+"A” 

360 E3$=CHR$(27)+”B" 

370 E4$=CHR$(27>+”G0720512” 

380 E5$=CHR$(27)+"@” 

390 E6$=CHR$(27)+”G1360512” 

400 FORI=1TOLEN(E3$+E4$):P0KE&HDFE7+I, ASC( 

MID$(E3$+E4$,I,1)):NEXT 

410 POKE&HDF4C,LEN(E3S+E4S)+2 

420 F0RI = 1TQLEN(E5$):P0KE&HBFF5+1, ASC(MID$ 

(E5$, I, 1)): NEXT 

430 P0KE&HDF3F,LEN(E5$) 

440 REM P0KE&HD8B1,&H3:POKE&HD8B5,&HCB:POK 
E&HD8B6,&HB 
450 REM 

460 REM keuze menu 


470 STOPON 


480 TK$=”KEUZEiMENU” 

490 IFYP<12THENGOSUB2830:GOSUB2880: SPRITB$ 
(0 ) =” >* ELSEGOSUB2900: VDP (5) =56 


'jUöuudiw: UWlNiTiRVAL=50GOSVB610: INTERVA 

LON 

510 LOCATE10,8:PRINT”letter editor":LOCATE 
10,10:PRINT”tekst editor” 

520 LOCATE10,12:PRINT”saven”:LOCATE10,14:P 
RINT”laden" 


530 LOCATE10,16:PRIFT’printen”:LOCATE10,18 
:PRINT"stoppen” 

540 VPOKE7168, YP*8-1 
550 I$=INKEY$ 

560 IFI$=CHR$(30)THENIFYP>8THENYP=YP-2: GOT 
O540ELSEYP=18:GOTO540 

570 IFI$=CHR$(31)THENIFYP<18THENYP=YP+2: GO 
TO540ELSEYP=8: GOTO540 
580 IFI$=CHR$(32)THEN600 
590 GOTO550 


600 VDP(5)=54:INTERVALOFF:ON(YP-6)/2G0SUB6 
80,1790,1880,1960,2040,640:GOTO480 
610 GETTIMETI$:L0CATE23,1:PRINTTI$:RETURN 
620 REM 


630 REM stoppen 

640 P0KE&HF3B1,24:DEFUSR=&H3E: DUMY=USR(0) : 
DEFUSR=&H69:DUMY=USR(0): CLS: BASE(6>=8192: B 
ASE(8)=6912:SCREBNSC:WIDTHVI:COLORVK,AK,BK 
:IFFT=255THENKEY0N 
650 ONERRORGOTO: END 
660 REM 

670 REM letter editor 
680 GOSUB2840:GOSUB1720 
690 VP0KE6162,242:VPOKE6163,243 
700 VPOKE6164, 244 

710 IF(PEEK(&HFBEB)AND1)=0THENGOSUB910 
720 IF(PEEK(&HFBEB)AND2)=0THENGOSUB970 
730 I$=INKEY$ 

740 IFI$=CHR$(11)THENIFXCORYCTHENGOSUB1750 

750 IFI$=CHR$(13)THENGQSUB1040 

760 IFI$=CHR$(24)THENGOSUB1680 

770 IFI$=CHR$(28)THENGOSUB830 

780 IFI$=CHR$(29)THENGOSUB850 

790 IFI$=CHRS(30)THENGOSUB870 

800 IFI$=CHR$(31)THENGOSUB890 

810 IFI$=CHR$(32)THENLOCATE,,0:VPOKE6145+Y 

C*32+XC,VPEEK(6145+YC*32+XC)X0R1:U=USR1(0) 

:LOCATE,,1 
820 GOTO710 

830 XC=XC+1: IFX07-8*(FO=16>THENXC=0 

840 LOCATEXC: RETURN 

850 XC=XC-1 .* IFXC<0THENXC=7-8*(FO=16> 

860 LOCATEXC: RETURN 

870 YC=YC-1:IFYC<0THENYC=7-8*(FO=16) 

880 LOCATE,YC: RETURN 

890 YC=YC+1: IFY07-8* (FO=16)THENYC=0 

900 LOCATE, YC: RETURN 

910 LOCATE,,0 

920 I$=IMEYS 

930 IFI$=CHR$(28)THENKN=KN+GG:IFKN>236-3*( 
FO=8) THENKN=0 : DUMY=USR(KN): GOTO950ELSEDUMY 
=USR(KN):GOTO950 

940 IFI$=CHR^(29)THENKN=KN-GG: IFKN<0THENKN 
=236-3*(FO=8):DUMY=USR(KN): GOTO950ELSEDUMY 
=USR(KN):GOTO950 

950 IF(PEEK(&HFBEB)AND1)=0THEN920 
960 LOCATE,,1:DUMY=USR3(2): RETURN 
970 S=STICK(0) 


980 IF(S=60RS=70RS=8)THENIFVPEEK(7057)>160 

THENVPOKE(7057),VPEEK(7057)-4 

990 IF (S=20RS=30RS=4) THENIFVPEEK (7057X214 

THENVPOKE(7057),VPEEK(7057)+4 

1000 IF(S=80RS=10RS=2)THENIFVPEEK(7056)>22 

THENVPOKE(7056),VPEEK(7056)-4 

1010 IF (S=40RS=50RS=6)THENIFVPEEK(7056X11 

4THENVPQKE(7056), VPEEK(7056)+4 
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1020 IF (PEEK (&HFBEB)AND2)=0THEN970 

1030 DUMY=USR3(2):RETURN 

1040 X=2: IFVPEEK(7057)<204THENX=1:IFVPEEK< 

7057)<180THENX=0 

1050 Y=4:IFVPEEK(7056X107THENY-3:IFVPEEK( 
7056)<85THENY=2: IFVPEEK(7056)<63THENY=1: IF 
VPEEK<7056)<41THENY=0 

1060 STOPSTOP:LOCATE,,0:ON(X*5+Y+1)GOSUB10 
80,1120,1110,1090,1100,1130,1140,1150,1160 
, 1250,1170,1180,1190,1530,1360 
1070 LOCATEXC,YC:LOCATE,,1:STOPOFF:STOPON: 
DUMY=USR3(2): RETURN730 

1080 POKE&HD5EC, &H3E:POKE&HD5ED, &HF0: DUMY= 
USR1(3):RETURN 

1090 POKE&HD5EC,&HEE:P0KE&HD5ED,&H1:DUMY=U 
SRI(3):RETURN 

1100 DUMY=USR3 <4): DUMY=USR (O): RETURN 

1110 DUMY=USR1<1): RETURN 

1120 DUMY=USR1<2): RETURN 

1130 DUMY=USR1(4): RETURN 

1140 DUMY=USR1(5):RETURN 

1150 DUMY=USR1<6): RETURN 

1160 DUMY=USR1(7): RETURN 

1170 DUMY=USR3<3): DUMY=USR(KN): RETURN 

1180 DUMY=USR1(8): RETURN 

1190 I=ASC<INPUTS (D) 

1200 IFI>1ANDI<32THBNRETURN 
1210 IFIO1THEN1240 
1220 I=ASC<INPUTS (D) 

1230 IFI>63ANDI<96THENI=I-64 
1240 DUMY=USR2(I): RETURN 
1250 IFUSR3(1) =0THENBEEP :RETURN 
1260 LPRINT"KARAKTERSET" 

1270 LPRINTE2S 
1280 FORI=0TO39 
1290 FORJ =ITOI+200STEP40 
1300 LPRINTUSING”### ";J; 

1310 LPRINTE1S; 

1320 DUMY=USR4 <J):LPRINTSPC <8) 

1330 IFINKEYS=CHR$(27)THENBEEP: RETURN 
1340 NEXTJ:LPRINT 
1350 NEXTI:LPRINTE5S: RETURN 
1360 POKE&HF925, 16 

1370 IN$="021980filenaamO’; GOSUB2680 

1380 IFIS=CHRS(27)THENLOCATE0,16:PRINTCHRS 

(27)+CHRS(74): G0T01510 

1390 FI$=INS:Y=19 

1400 L0CATE22,19:PRINT"laden” 

1410 LOCATE22,21:PRINT”saven” 

1420 VP0KE7123, 2 
1430 I$=INKEYS 

1440 IFI$=CHR$(30)ANDVPEEK(7120)=167THENVP 
OKE7120,151 

1450 IFIS=CHRS(31)ANDVPEEK(7120)=151THENVP 
OKE7120,167 

1460 IFI$=CHR$(32)THEN1490 
1470 IFI$=CHRS(27)THENL0CATE11,19:VP0KE712 
3,0:PRINTCHRS(27)+CHRS(74):GOTO1370 
1480 GOTO1430 

1490 IFVPEEK(7120)=151THENBLOADFIS+”.KAR”. 

S 

1500 IFVPEEK(7120) = 167THENBSAVEFIS+" . KAR” 
&H0,&H800,S 

1510 P0KE&HF925,0:VPOKE7123,0:LOCATE0,16:P 
RINTCHRS(27)+CHRS(74) 

1520 DUMY=USR(KN): RETURN 

1530 VDP(4)=0:VDP(3)=159 

1540 LOCATE3,17:PRINT”abcdefghijklmnopqrst 

uvwxyz” 

UVWXYZ” CATE3 ’ 18: PRI5T ” ABCDEFGHI jklmnopqrst 

1560 L0CATE3,19:PRINT”!"+CHRS(34)+”#$%&' O 
*+,-./012” 

1570 LOCATE3,20:PRINT” m 3456789::<=>?@” 
1580 L0CATE3,21: PRINT" t-fi” 


1590 LOCATE3, 22: PRINT" ‘- J -‘ ” 

1600 VP0KE7127,2 
1610 IS=INKEY$ 

1620 IFI$=CHRS(30)ANDVPEEK(7124)>135THENVP 
OKE7124,VPEEK(7124)-8 

1630 IFIS=CHR$(31)ANDVPEEK<7124X159THENVP 
OKE7124,VPEEK(7124)+8 

1640 IFI$=” "THENP=(159-VPEEK(7124))/8: DUM 
Y=USR5(P): DUMY=USR(KN) 

1650 IFIS=”V"THENP=(159-VPEEK(7124))/8+4:D 
UMY=USR5 <P): DUMY=USR(KN) 

1660 IFI$=CHR$ <27)THENLOCATE0,16:VP0KE7127 
,0:PRINTCHRS(27)+CHRS(74):VDP(4)=2:VDP <3) = 
223:RETURN 
1670 GÜTO1610 

1680 VPOKE6169,245:VPQKE6170,245 
1690 VPOKE6201,245:VPOKE6202,245 
1700 F0=F0X0R24:GG=GGX0R5 
1710 IFFO=16THENK5=KNAND252 
1720 POKE&HDDCB,FO 
1730 GOSUB3240 

1740 SPRITES(0)=””;DUMY=ÜSR(KN) 

1750 XC=0 : YC=0 : LOC ATE0 , 0 
1760 LOCATE,,1:RETURN 
1770 REM 

1780 REM tekst editor 
1790 CLS:GOSUB2850 

1800 LOCATE0,16: PRINT” r hhhM-|-hh|-|-|-h|-h|-|-|-h|- 
hhhhhhhhl-hh IQéa&êèOFFICE-|iBY-)MARTIN-) -)-Mi-) 

1 tluaagëïV2.01 ii-f -\ -l-Mi-I VD-) 11 -nH•) t" ; 

1810 PRINT” Mi mmiiHmüi-IGRAAFFiiH-) 

fMiimmimnmn-nn-mmtiRG:00iiP 

G: i i 1 i BE: i -)i -| NO: H H -H f’ i 

1820 PRINT” |KO:001iTB:ü-HEIHii-Hi-l-l-l-l-l-l-i 

t'-*-- ><. 

1830 PUTSPRITE0, (232,167),15,0 
1840 DUMY=USR6(0) 

1850 RETURN 
1860 REM 
1870 REM saven 

1880 TK$="SAVENiUii":GOSUB2900 
1890 IN$=”020880filenaamC’ 

1900 GOSUB2680:FIS=INS 

1910 GOSUB2770: IFI$=CHRS(27)THBNLOCATE10.7 
:PRINTSPC(224):GOTO1890 

1920 POKE&HFCAF,7:BSAVEFIS+".TXT”,16384,62 
464!,S 

1930 POKE&HFCAF,1:RETURN 

1940 REM 

1950 REM laden 

1960 TK$=”LADEN-| i i 11 ” : GOSUB2900 
1970 IN$="020880filenaamO’ 

1980 GOSUB2680:FIS=INS 

1990 GOSUB2770:IFI$=CHR$(27)THENLOCATE10,7 
:PRINTSPC(224):GOTO1970 
2000 POKE&HFCAF, 7: BLOADFIS+" . TXT" S 
2010 POKE&HFCAF,1:RETURN 
2020 REM 
2030 REM printen 
2040 TKS=”PRINTENii i ” : GOSUB2900 
2050 LOCATE7,9:PRINT”rhhhhhhhhhhhhhhhhh 
I VAN-| PAGINAH-H001t 
| TOT-) PAG I NA H -) i 008f » ; 

2060 PRINT” i-H-Hiü-m-HH-t-H-H- 
I VETDRUKH-m-HX-Ht |INi KOLOM 

MENHIXUt ”; 

2070 PRINT” Hi-H-iHI-mn-H-Ht 
| AANTAL: H1-|Hi001t -- 

-1 ii, 

2080 Y=10 

2090 PUTSPRITE0, <162,79),2,26 
2100 I$=INKEY$ 

2110 IFIS=CHR$(30)THENIFY>10THENY=Y-1ELSEY 
=16 

2120 IFIS=CHR$(31)THENIFY<16THENY=Y+1ELSEY 
= 10 
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2130 IFI$=CHR$(32)THENGOSUB2180 
2140 IFIS>CHR$ (47)ANDI$<CHR$ (58)THENG0SUB2 
210 

2150 IFIS=CHRS(13)THENGOSUB2260 
2160 VP0KE6912, Y*8-l 
2170 GOTO2100 

2180 IFYO13ANDYO14THENRETURN 

2190 VP0KE6166+Y*32,VPEEK(6166+Y*32)X0R75 

2200 RETURN 

2210 IFYO10ANDYO11ANDYO16THENRETURN 
2220 VP0KE6166+Y*32,VPEEK(6167+Y*32) 

2230 VP0KE6167+Y*32,VPEEK(6168+Y*32 > 

2240 VP0KE6168+Y*32, ASC(I$) 

2250 RETURN 

2260 BP=VAL(CHR$(VPEEK(6486))+CHR$(VPEEK(6 
487))+CHR$(VPEEK(6488))) 

2270 EP=VAL(CHR$(VPEEK(6518))+CHR$(VPEEK(6 
519))+CHRS(VPEEK(6520))) 

2280 AT=VAL(CHR$(VPEEK(6678))+CHRS(VPEEK(6 
679))+CHRS(VPEEK(6680))) 

2290 DB=-(VPEEK(6582)=88) 

2300 K0=-(VPEEK(6614)=88) 

2310 IFBP<10REP <1ORBP > 80REP > 80RBP> EPOR AT=0 

0RUSR3(1) =0THENBEEP : RETURN 

2320 IFKOTHEN2480 

2330 FORI=1TOAT 

2340 FORJ=BPTOEP 

2350 FORK=0TO79 

2360 FORL=0TODB 

2370 IFINKEYS=CHRS(27)THENBEEP:RETURN 
2380 LPRINTSPACES(4)+E4$; 


2390 DUMY=USR7 (VAL (”&H"tHEX$ (&H2C00tJ*&H14 
00+K*&H40)>) 

2400 LPRINTCHR$(13); 

2410 NEXTL 
2420 LPRINTE3S 
2430 NEXTK 
2440 LPRINTCHRS(12); 

2450 NEXTJ, I 
2460 LPRINTE5S 
2470 RETURN 
2480 F0RI=1T0AT 
2490 FORJ =BPT0EPSTEP2 
2500 FORK=0TO79 
2510 FORL=0TODB 

2520 IFINKEYS=CHRS(27)THENBEEP: RETURN 
2530 LPRINTSPACES(2)+E6S: 

2540 DUMY=USR7< VAL <"&H”+HEXS(&H2C00+J*&H14 
00+K*&H40))) 

2550 IFJ=EPTHEN2580 
2560 LPRINTSPACES(2)+E6S: 

2570 DUMY=USR7(VAL(”&H”+HEXS(&H2C00+(J+l)* 
&H1400+K*&H40))) 


2580 LPRINTCHRS(13); 

2590 NEXTL 
2600 LPRINTE3S 
2610 NEXTK 
2620 LPRINTCHRS(12); 

2630 NEXTJ,I 
2640 LPRINTE5S 
2650 RETURN 
2660 REM 

2670 REM inputroutine 

2680 LOCATEVAL(MIDS(INS,1,2)),VAL(MIDS(INS 
,3,2)):IL=VAL(MIDS(INS,5,1)): PRINTMIDS(INS 
,7);:X=POS(0):Y=CSRLIN:IFMIDS(INS, 6,1)=CHR 
S(49)THENTTS="0123456789”ELSETT$=”abcdefgh 
ijklmnopqrstuvwxyz” 

2690 INS=””:AT=0 
2700 IS=INPUTS<1) 

2710 IFINSTR(TTS,IS) <>0ANDAT< ILTHENIN$=INS 
+1$:AT=AT+1:LOCATEX,Y:PRINTINS; 

2720 IFI$=CHRS(8)ANDAT>0THENAT=AT-1:IN$=LE 
FTS(INS,LEN(INS)-1):PRINTCHRS(8)+" ”+CHRS( 
8 ); 

2730 IF( IS-CHRS (13) ANDINSO”” )0R(I$=CHR$ (2 
7)ANDCSRLIN=19 >THENRETURN 
2740 GOTO2700 
2750 REM 


2760 REM geef toets 

2770 L0CATE2,CSRLIN+3 

2780 PRINT"geef toets";:IS=INPUTS(1) 

2790 IFIS< > CHRS(27)THENL0CATE2: PRINT"even 
geduld)}>"; 

2800 RETURN 
2810 REM 

2820 REM vdp instellingen 

2830 VDP(1)=162: CLS: WIDTH32: VDP(0)=0; VDP(3 

)=127:VDP(4)=2:VDP(5)=56:CLS:LOCATE,,0:VDP 

(1)=226:P0KE&HF925,16:RETURN 

2840 VDP(1) = 162:CLS: VIDTH30: DUMY=USR3 (0): V 

DP(3)=223:VDP(0)=2:VDP(4)=2:VDP(5)=55::FOR 

I=10232TO10239:VPOKE1,241:NEXT:VDP(1)=226: 

P0KE&HF925,0:RETURN 

2850 VDP(1)=162:VDP(5)=54:VDP(3)=223:VDP(4 
)=2:VDP(0)=2:VIDTH32:FORI=10232TO10239:VPO 
KE1,27:NEXT:VDP(1)=226:P0KE&HF925,0:LOCATE 
0,16:RETURN 
2860 REM 

2870 REM kop printen 

2880 LOCATE0,0:print” rhhhhhhhhH-H-hhhhhhhh 
hhH-hhhhhh ICéaaêèOFFICEii^ü^-|-)-m-|-|-|-H 
tl uaagëï V2.0H i i n -i i i i ü i i j i i i i -i -p' ; 

2890 print" 1 -rhhhhhl-l-hhh- 

J mummt 


2900 LQCATE23, 1:PRINT”-|iUiiü”: LOCATE0, 6: 
PRINTCHRS(27)+CHRS(74) 

2910 L0CATE17,4:PRINTTKS 
2920 RETURN 
2930 REM 

2940 REM ctrl-stop 

2950 IFSBTHENERROR19 

2960 IFVDP <5)=56THENRETURN 

2970 IFYP=8THENPOKE&HDDD3,KN:IFFO=8THENPOK 

E&HDDD4,1ELSEP0KE&HDDD4,4 

2980 IFYP=10THENKN=PEEK(&HDDD3):GG=PEEK(&H 

DDD4):IFPEEK(&HDDD4)=4THENFO=16ELSEFO=8 

2990 VP0KE7123,0:VPOKE7127,0:VP0KE6915,0 

3000 RETURN480 

3010 REM 

3020 REM error-routine 

3030 IFERR=19ANDERL>1240ANDERL<1360THENRES 
UME 

3040 IFERR=19ANDERL>2320ANDERL<2650THENRES 
UME 

3050 IFERL=1920THENPOKE&HFCAF, 1:GOSUB3090: 
RESUME1880 

3060 IFERL=2000THENPOKE&HFCAF,1:GOSUB3090: 
RESUME1960 

3070 IFERL>1370ANDERL<1520THENVPOKE7123, 0: 
LOCATE0,19:PRINTCHRS(27)+CHRS(74): GOSUB309 
0:LOCATE11,19:PRINTCHRS(27)+CHRS(74):RESUM 
E1370 

3080 STOPSTOP:GOSUB3090:STOPOFF:STOPON:RES 

UME1950 

3090 FS=”" 

3100 IFERR=19THENF$=”device io error” 

3110 IFERR=60THENFS=”disk niet geformattee 


IFERR=66THENF$=”diskette vol” 
IFERR=69THENF$=”disk io error” 
IFERR=70THENF$=”geen diskette in driv 


rd” 

3120 
3130 
3140 
e" 

3150 IFERR=68THENFS="disk is beveiligd” 
3160 IFERR=530RERR=61THENFS="file niet gev 
onden” 

3170 IFFS=”” THENSCREEN0 :KEYON:ONERRORGOTO 
3180 LQCATE2,CSRLIN+(YP=8>:PRINTFS:BEEP 
3190 LOCATE2,CSRLIN+1:PRINT”druk op escape 

3200 IFINKEYS=CHR$(27)THENRETURNELSE3200 
3210 RETURN 
3220 REM 

3230 REM raster printen 








3240 LOCATE0,0,0:1FFO=16THEN3310 
3250 A$=» =ir= == == j ========== ♦■ 

3260 F0RI=1T08: PKINTAS: SEXT 
3270 PRINT”JJJJJJJJj====” 

3280 fit - 

3290 FORI = 1T07: PRINTAS:NEXT 
3300 RETURN 

3310 A$=” =^—: __ = » 

3320 F0RI=1T016: PRINTAS: NEXT 
3330 RETURN 
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1 26© 

- 

34 

Regel: 

127© 

- 

56 

Ragal : 

1280 

- 

218 

Ragal: 

1290 

- 

1 

Regel: 

1 300 

- 

14 

Regel: 

131 0 

- 

1 14 

Ragal: 

1 320 

- 

1 79 

Ragal: 

1 33© 

- 

216 

Ragal; 

1 340 

- 

1 64 

Regel: 

1350 

- 

9 

Ragal: 

1 360 


13 

Ragal: 

137© 


49 


Ragal: 1380 - 2©4 
Ragal: 139© - 1 
Ragal: 1400 - 94 
Ragal: 141© - 121 
Regel: 1420 - 15 


Ragal: 

143© 

- 

72 

Ragal: 

1 44© 

- 

253 

Ragal: 

1 45© 

- 

254 

Ragal: 

1 46© 

- 

1 87 

Ragal: 

1 470 

- 

147 

Ragal: 

1 480 

- 

5© 

Regel: 

1490 

- 

43 

Ragal: 

1 50© 

- 

1 80 

Ragal: 

1510 

- 

191 

Ragal: 

1 520 

- 

1 89 

Ragal: 

1530 

- 

5© 

Ragal: 

1540 

- 

1 02 

Ragal: 

1550 

- 

39 

Ragal: 

1 56© 

- 

79 

Ragal: 

1 570 

- 

1 49 

Ragal: 

1 580 

- 

74 

Ragal: 

1590 

- 

85 

Ragal: 

1 600 

- 

19 

Ragal: 

1610 

- 

72 

Ragal: 

1620 

- 

6© 

Ragal: 

163© 

- 

86 

Ragal: 

1 64© 

- 

1 28 

Ragal: 

1650 

- 

1 88 


Ragal: 166© - 209 
RagalJ 167© - 231 
Ragal : 168© - l 93 
Ragal: 1690 - 1 
Rag»1: 1700 - 139 
Ragal: 1710 - 42 
Ragal: 172© - 13 
Ragal: 173© - 79 
Ragal: 1740 - 175 
Ragal; 175© - 209 


Ragal: 

1 76© 

- 

10 

Regel: 

1 770 

- 

0 

Raga1: 

178© 

- 

0 

Ragal: 

1 730 

- 

161 

Raga1: 

1 806 

- 

133 

Ragal: 

181© 

- 

47 

Ragal: 

1820 

- 

1 69 

Ragal: 

1830 

- 

1 ©4 

Ragal: 

1 84© 

- 

1 32 

Ragal: 

1 850 

- 

142 

Ragal: 

186© 

- 

0 

Ragal: 

1 87© 

- 

0 

Ragal: 

1860 

- 

75 

Regel: 

1890 

- 

216 

Ragal: 

1 900 

- 

1 80 

Ragal; 

191© 

- 

179 

Ragal: 

1320 

- 

48 

Ragal: 

1 93© 

- 

85 

Regel: 

1 340 

- 

0 

Ragal: 

1 950 

- 

0 

Ragal: 

1 960 

- 

50 

Ragal: 

1 970 

- 

216 

Ragal: 

1 980 

- 

1 80 

Ragal; 

1390 

- 

3 


Ragal 

: 2000 

- 49 

Ragal 

: 2010 

- 85 

Regel: 

: 2020 

- 0 

Ragal; 

: 203© 

0 

Regel: 

: 2040 

- 7© 

Ragal: 

2050 

- 139 

Ragal: 

206© 

- 17 

Ragal: 

2070 

- 53 

Regel: 

208© 

- 97 

Ragal: 

209© 

- 215 

Ragal: 

2100 

- 72 

Ragal: 

21 10 

- 128 

Ragal; 

2120 

- 130 

Ragal; 

2130 

- 253 

Regel; 

2140 

- 171 

Ragal: 

2 1 6© 

- 58 

Ragal: 

2160 

- 146 

Ragal: 

217© 

- 21 1 

Ragal: 

2180 

- 144 

Ragal: 

219© 

- 152 

Ragal: 

220© 

- 1 42 

Ragal: 

2210 

- 214 

Ragal: 

222© 

- 71 

Ragal: 

223© 

- 73 

Ragal: 

2240 

- 252 

Regel: 

2250 

- 142 

Regel: 

2260 

- 86 

Regel: 

2270 

- 1 84 

Regel : 

2280 

- 155 

Regel: 

229© 

- 225 

Ragal: 

2300 

- 21 

Regel: 

2316 

- 21 

Regel: 

232© 

- 198 

Ragal: 

2330 

- 58 

Regel: 

234© 

- 1 87 

Ragal; 

2350 

4 

Rage1: 

236© 

45 

Regel: 

237© 

- 216 


Ragal: 2380 - 100 
Ragal: 239© - 117 
Rage1: 240© - 218 

Regel: 2410 - 207 
Regel: 242© - 57 

Ragal: 243© - 206 
Rage 1 : 2440 - 217 

Ragal: 2450 - 66 

Ragal: 2460 - 59 

Ragal: 247© - 142 
Regel: 248© - 58 

Ragal: 2490 - 17© 
Regel: 2500 - 4 

Regel: 2510 - 45 

Rega1: 2520 - 216 
Ragal: 253© - 100 
Regel: 2540 - 117 

Regel: 2550 - 95 

Rage1: 2560 - 100 

Ragal: 2570 - 2©l 
Regel: 2580 - 218 
Regel: 259© - 207 
Regel: 2600 - 57 

Ragal: 2610 - 206 
Regel: 262© - 217 
Regel: 2630 - 66 

Ragal: 2640 - 59 

Ragal: 2650 - 142 


Regel: 

: 266© 

- 

0 

Regel; 

: 2670 

- 

0 

Regel; 

: 268© 

- 

17 

Ragal: 

: 2690 

- 

1 89 

Ragal: 

270© 

- 

1 04 

Regel! 

271© 

- 

200 

Regel: 

2720 

- 

238 

Rage1: 

2730 

- 

24 

Rag»1: 

2740 

- 

45 

Ragal: 

2750 

- 

0 

Ragal: 

2760 

- 

0 

Regel: 

2770 

- 

4 

Regel: 

278© 

- 

152 

Regel: 

279© 

- 

1 75 

Regel: 

280© 

- 

1 42 

Regel: 

2810 

- 

0 

Regel: 

2820 

- 

0 

Regel: 

283© 

- 

1 66 

Regel: 

2840 

- 

2© 

Regel : 

2850 

- 

223 

Regel: 

286© 

- 

0 

Regel: 

287© 

- 

0 

Ragal: 

288© 

- 

191 

Regel: 

289© 

- 

24 

Ragal: 

290© 

- 

92 

Ragal: 

2910 

- 

1 99 

Ragal: 

292© 

- 

142 

Regel : 

2930 

- 

0 

Ragal; 

294© 

- 

0 

Ragal: 

2950 

- 

1 94 

Ragal: 

2960 

- 

88 

Ragal: 

2970 

- 

1 1 1 

Ragal: 

2980 

- 

254 

Regel: 

2990 

- 

207 


Regel: 300© - 125 
Ragal: 301 © - 0 

Ragal: 3020 - 0 

Regel: 303© - 216 
Ragal: 3040 - 36 

Ragal: 305© - 152 
Ragal: 306© - 56 

Ragal: 3070 - 186 
Ragal: 308© - 187 
Ragal; 309© - l57 
Ragal: 31 00 - ï 67 
Regel: 3110 - 34 

10 REM DBEL1 
20 REM behoort bij PRINT OFFICE 
30 REM 

40 CLS: SCREEN0 : WIDTH80 
50 CLEAR200,&HC900 

60 PR INT” De data’s worden in het geheusren 
gePOKEd.” 6 8 

70 PRINT”Even geduld aub...." 

80 FORI=&HC900TO&HDBE0STEP64 
90 CG!=0 

100 F0RJ=ITO1+63 

110 RBADHS 

120 H=VAL("&H"+HS) 

130 CG!=CG!+H 
140 POKEJ,H 
150 NBXTJ 
160 READCG$ 

170 IFVAL <"&H”+CG$)< >CG!THENPRINT:PRINT”DA 
TAFOUT in regel:”;PEEK(&HF6A3>+256*PEEK(&H 
F6A4):BEEP:END 
180 NEXTI 
190 CLS 

200 PRINP’U kunt het geheugengebied C900h- 
DBE0h nu saven met :" 

210 PRINT 

220 PRINT”BSAVE”+CHR$(34)+”DEEL1”+CHR$(34) 
+",&HC900, &HDBE0” 

230 PRINT 

240 PRINT”Vergeet niet dit basic-pragramma 
te saven!” 


Rage1: 

3120 

- 

242 

Regel: 

3136 

- 

20 

Regel: 

3140 

- 

1 17 

Regel; 

3150 

- 

1 52 

Regel: 

3160 

- 

17 

Regel; 

31 70 

- 

1 13 

Regel: 

3180 

- 

33 

Ragal: 

3190 

- 

1 46 

Regel: 

3200 

- 

83 

Ragal: 

3210 

- 

ï 42 

Ragal: 

322© 

- 

0 

Ragal : 

323© 

- 

0 


Regel: 

324© 

- 173 

Regel: 

3250 

- 157 

Rege1: 

3260 

- 171 

Regel: 

3270 

2 

Regel: 

3280 

- 152 

Regel: 

3290 

- 17© 

Regel: 

330© 

- 142 

Regel: 

3310 

- 1 52 

Regel: 

332© 

- 177 

Regel: 

3330 

- 142 

Totaal 

34123 


250 END 
260 REM 
270 DATA 18, 
FF,FF,18,18, 
18,18,1F,1F, 
18, 18, 18, 18, 
00 , 00 , 00 , 00 , 
280 DATA 00, 
0F,07,00,00, 
28,EF,00,FF, 

28.28.28, E8, 

28.28.28.28, 
290 DATA 28, 
00,FF,00,00, 
00,F8,08,E8, 
00, 28,28, E8, 
FF,00,00,00, 
300 DATA 24, 
20,20,23,26, 
24,24,24,24, 
00,00,00,1F, 
C4,64,24,24, 
310 DATA 24, 
AA, 55, FF, 00, 
2C,F4,AC,54, 
2C,34,2C,F7, 
2C,34,2C,00, 
320 DATA 00, 
AC, 54,EC,34, 
2C, F4, AC, 54, 
00 , 00 , 00 , 00 , 
10, 10, 10,10, 
330 DATA 10, 
10,10,10,10, 
00,00,1F,10, 
10, 10,10,10, 
00,00,00,54, 


18.18, FF, 

18.18.18, 
18,18,18, 
18, 18,18, 
00,00,07, 
00,00,E0, 
00,18,18, 
00 , 00 , 00 , 
08,E8,28, 
28,EF,00, 
28,28,28, 
00 , 00 , 00 , 
28,28,28, 
08,F8,00, 
00,FF,00, 
64,C4,04, 
24,24,66, 
24,24,24, 
30,20,23, 
26,23,20, 
64,C4,04, 
00 , 00 , 00 , 
EC,34,2C, 
AA,55,EF, 
00,FF,AA, 
00,3F,2A, 
2C,34.2C, 
FC,00,00, 
FF,10,10, 
10,10, 1F, 
10, 10,FF, 
10,00,00, 
10, 10,10, 
1F, 00,00, 
D7,10,FF, 


FF,00, 
18,F8, 
18,18, 
18,18, 
0F,IC, 
F0,38, 
38,F0, 
00 , 00 , 
28,28, 
EF,28, 
28,28, 
3F,20, 
28,28, 
00 , 00 , 
00,C3, 
04, C4, 
C3,00, 
00 , 00 , 
26,24, 
30,1F, 
0C,F8, 
FF,AA, 
34,2C, 
34.2C, 
55,FF, 
35,2F, 
37,2A, 
10 , 10 , 
10 , 10 , 
10 , 10 , 
10 , 10 , 
00, FF, 
00 , 00 , 
00 , 00 , 
00, FF, 


00 , 00 , 00 , 00 , 00 , 
F8, 18,18, 18, 18, 
18, FF, FF, 18,18, 
00, 00, 00, FF, FF, 
18,18,D88 
18, 18,18, 18, IC, 

EO, 00,00,00,28, 

FF, 00,EF,28,28, 
28,28,2F,20,2F, 
28,28,1002 

28,28,00, 00, FF, 
2F,28,28,28,00, 
2F,20,3F,00,00, 
24,66, C3,00,00, 
66,24,E52 
64,24,24,26,23, 
00, C3,66,24,24, 
FF,00,00,FF,00, 
00, 00,F8,0C,04, 
00,00,D7E 
00,00,34,2C,F7, 
55,EF,34,2C,34, 
37,2A,35,2F,34, 
34,2C,34,2C,34, 
00,00,163D 
34,2C,00,00, FC, 
35, 3F,00,00,34, 
10, FF, 00,00,00, 
10, 10, 10, F0, 10, 

10.10, D57 

10.10.10.10.10, 
00 , 00 , 00 , 00 , 00 , 
00, F0, 10, 10, 10, 
10, 10, 10, F0, 00, 
00,00,925 


7 





















340 DATA 
F4,14,D4, 
D7, 10,FF, 
54,00,FF, 
57,54,54, 
350 DATA 
F4,04,FC, 
FF,00,FF, 
5A, 5A, 5B, 
18,DB,5A, 
360 DATA 
5F,5F,58, 
5B, 58, 5F, 
00,18,3C, 
66,3C,18, 
370 DATA 
C3,C3,66, 
00,7E,C3, 
18,00,00, 
0E,00,00, 
380 DATA 
00 , 00 , 00 , 
7E,F0,7C, 
00,70,E8, 
00 , 00 , 00 , 
390 DATA 
38.7C,BA, 
00 , 00 , 00 , 
00 , 00 , 00 , 
70,E0,00, 
400 DATA 
IC,70,E0, 
3C,5C,9C, 
00,7C,E0, 
38,38,00, 
410 DATA 
00, 70, 70, 
3C,78,F0, 
00,F0,78, 
00,70,00, 
420 DATA 
00 , 00 , 00 , 
78,A0,70, 
00,40,A0, 
00,00,00, 
430 DATA 
20,70,A8, 
00 , 00 , 00 , 
00 , 00 , 00 , 
40,80,00, 
440 DATA 
IC,60,80, 
14,24,44, 
00,7C,80, 
10 , 10 , 00 , 
450 DATA 
00 , 00 , 20 , 
20,40,80, 
00,80,40, 
00 , 20 , 00 , 
460 DATA 
00 , 00 , 00 , 
7C, D0,78, 
00,60,D0, 
00 , 00 , 00 , 
470 DATA 
30,78,B4, 
00 , 00 , 00 , 
00 , 00 , 00 , 
60,C0,00, 
480 DATA 
7C,E0,E0, 
4C,9C,9C, 
00, 7C, C6, 
38, 38,00, 


00,FF,00, 
54,54,54, 
10,D7,54, 
00,FF,00, 
00,FC,04, 
54,57,50, 
00, 00,5A, 
FF,18,DB, 
58,5F,5F, 
5A,5A,5A, 
00, FF,00, 
5B,5A,00, 
5F,40,7F, 
66,C3,C3, 
18,3C,64, 
18,3C,26, 
3C,18,18, 
C3,7E,00, 
70,C8,C4, 
18,3C,64, 

38.38.38, 
00,00,74, 
IE,FC,10, 
70,EA,E4, 
IC,38,70, 
70,38,IC, 
38,00,00, 
00,38,38, 
00,00,70, 
7C,E2,E2, 

38.78.38, 
FE,00,7C, 
FE, IC, IC, 
E0,FC,E2, 
7C,E2,E2, 
7C,E2,E2, 
70,00,70, 
78.3C,IE, 
3C,1E.3C, 
7C,8E,0E, 
20,20,20, 
00,00,50, 
28,F0,20, 
40,A8,90, 
18,20,20, 
30,08,08, 
20,00,00, 
00,20,20, 
00 , 00 , 00 , 
7C,82,82, 

10.30.10, 
FE,00,7C, 
84,FE,04, 
80,FC,82, 
7C,82,82, 
7C,82,82, 
00,00,00, 

40.20.10, 
20 , 10 , 20 , 
7C,82,02, 
30,30,38, 
00,00,48, 
IC, F8, 10, 
60,D4,E8, 
18,30,30, 

30.18.18, 
30,00,00, 
00,30,30, 
00,00,00, 
7C,C6,E6, 

38.58.18, 

FE, 00,7C, 
FE, IC, IC, 
E0,FC,E6, 

7 C,C6,E6, 


FF,10,D7,54,54,54,D4,14, 
57,50,5F,50,57,54,54,54, 
54,54,54,54,54,54,54,54, 
FF, 00, 00, 00, 7F, 40, 5F, 50, 
F4,14,D4,54,54,194D 
5F, 40, 7F, 00, 00,54, D4, 14, 
DB,18,FF,FF,00,FF,00,00, 
5A,5A,DA,IA,FA,FA,IA,DA, 
58,5B,5A,5A,DB,18, FF,FF, 
5A,5A,5A,5A,5A,1CAD 
FF,FF,00,FF,00,00,7F,40, 
FE,02,FA,FA,1A,DA,5A,5A, 
00, 5A,DA, IA, FA, FA, 02,FE, 
7E, 00,00, 00,00,7E, C3, C3, 
C4, C4,64,3C, 18, 1A08 
23,23,26,3C,18,18,3C,66, 
3C,24,24,24.24.3C, 18,00, 
00,00,00,0E,13,23,26,3C, 
64,3C,18,18,3C,26,23,13, 
C4,C8,70,00,00,ED2 
38, 00,38,38, 00,6C,6C,6C, 
74,FE,74,FE,74,74,00,10, 
00, C6, CE, IC, 38, 70, E6, C6, 
E6, 78, 00, IC, 38,70, 00,00, 
70,70,38,IC,00,15AC 
IC,IC,38,70,00,38, BA, 7C, 
30,30, FC, FC, 30, 30, 00, 00, 
70,00,00,00,78,78, 00,00, 
70, 70,00, 00, 00, 0E, IC, 38, 
E2,E2,F2,7C,00,11B4 
38,38,38,38, 00, 7C, 8E, 0E, 
8E,0E,7C,0E,8E,7C,00,IC, 
00, FC, E0, E0, FC, 02, 02, FC. 
E2,7C, 00, FE, 0E, IC, 38,38, 
7C, E2, E2,7C,00,1BB0 
7E, 02,02,7C,00,70,70,70, 
70, 70, 00, 70, 70, 70, E0, IE, 
00,00,F8,F8,00,F8,F8,00, 
78, F0, 00, 78,9C, IC, 38, 70, 
6E,AE,AE,7C,00,18DE 
20,20,00,20,00,50,50,50, 
50, F8, 50, F8,50,50, 00,20, 
00,C0,C8,10,20,40,98,18, 
98,60,00,10,20,40,00,00, 
20,20,20,18,00,F48 
08,08,08,30,00,20,A8,70, 
20,20, F8, 20,20,00,00, 00, 
40,00,00,00,78,00,00,00, 
60,60,00,00,00,08, 10,20, 
82, C2, E2, 7C, 00, B62 
10, 10, 10,10, 00, 7C, 82, 02, 
82,02,IC,02,82,7C, 00, 0C, 
00,FC,80,80,FC,02,02, FC, 
82, 7C,00,7E,02,04,08,10, 
7C,82,82,7C, 00,13DC 
7E,02,02,7C,00,00,00,20, 
00,20,00,00,20,20,40,10, 
00,00,00, F8, 00, F8,00,00, 
40,80,00,78,84,04,18,20, 
72, 92, 92, 7C, 00, CE8 
38,00,38,38,00,90, D8, D8, 
FC,68,68,FC,68,00, 00, 10, 
00, C6, CE, IC, 38,70, E6, C6, 
EC, 70,00,30, 60, C0,00,00, 
30,30,30,18,00, 150C 
18, 18, 18,30, 00,30, B4, 78, 
30,30,FC,30,30,00, 00,00, 
60,00,00,00,78,00,00,00, 
60,60,00,00,00,0C, 18,30, 
E6, E6, F6,7C,00,E4E 
38,38,38,7C,00,7C,C6,0E, 
C6,0E,3C,0E,CE,7C,00,3C, 
00,FE,C0,E0,FC,0E, CE, 7C, 
E6,7C,00,FE,06,0C,18,38, 
7C, E6, E6, 7C, 00,1D44 


490 DATA 7C,C6,E6,7E, 
00,30,30,00,00,00,30, 
30,60,C0,60,30,18,00, 
00,C0,60,30,18,30,60, 
00,30,00,7C,86,0E,6E, 
500 DATA 30,30,30,30, 
00,00,00,00,00,68,68, 
7C, B0,78,34,F8,30,00, 
00,60, D0,60, D4, C8, CC, 
00,00,00,18,30,60,60, 
510 DATA 60,30,18,18, 
30,78,B4,30,00,00,30, 
00,00,00,00,60,60,C0, 
00,00,00,00,00,00,60, 
60, C0, 00,7C, C6, C6, C6, 
520 DATA 18,38,18,18, 
7C, C0, C0, FE,00,7C,C6, 
2C, 4C,8C,FE,0C,0C,00, 
00, 7C, C0, C0, FC, C6, C6, 
30, 30, 00, 7C, C6, C6,7C, 
530 DATA 7C,C6,C6,7E, 
00,30,30,00,00,00,30, 
30,60,C0,60,30,18,00, 
00,C0,60,30, 18,30,60, 
00,30,00,78,8C,0C, 6C, 
540 DATA 70,50,50,50, 
A8,F8,00,00,00,7C,D6, 
C2, AE, C6, EA, 86, FC, 00, 
00,78, C8, AC, 84, AC, D4, 
00,00,00,F0,90,B0, A0, 
550 DATA F0,90,D0,50, 
6C,C6,AA,FE,00,38,28, 
00,00, 70,50, D0, B0, E0, 
00, 00,00,00,00,F0,90, 
A0, C0,00, FE, 82, BA, BA, 
560 DATA 78,48,68,28, 
82, BE, 82,FE,00,FE,82, 
64, D4, B6, 82, F6, IC, 00, 
00,FE,82,BE,82,BA,82, 
28,38,00, FE,82,BA,82, 
570 DATA FE,82,BA,82, 
50,70,50,70,00,00,00, 
64,CC,98,CC,64,3C,00, 
00, F0,98, CC, 64, CC, 98, 
28,38, 00,78, CC, B4, D4, 
580 DATA 00,00,20,20, 
A0,00,00,00,00,00,00, 
20,F8,A0,F8,28,F8,00, 
00,00,00,40,A0,40,A8, 
00, 00,00,00,00,70,40, 
590 DATA 00,00,70,10, 
70,20,70,A8,00,00,00, 
00,00,00,00,20,20,40, 
00,00,00,00,00,00,60, 
40, 80, 00,00,00, F8, 88, 
600 DATA 00,00,30,10, 
08, F8,80,F8,00,00,00, 
00, 30,50,90,F8,10,00, 
00,00,00,F8,80,F8,88, 
20, 20, 00, 00,00, F8, 88, 
610 DATA 00,00,F8,88, 
20 , 00 , 20 , 00 , 00 , 00 , 00 , 
00,30, 60, C0,60,30, 00, 
00, 00,00,C0,60,30,60, 
00, 20, 00,00, 00, F8,08, 
620 DATA 10,10,20,20, 
00,00,00,00,00,14, 14, 
3E,48,38,14,F8,10,00, 
00,10,28,30,54,48,4C, 
00,00,00,10,20,20,40, 
630 DATA 20,10,10,10, 
10,78, A4, 20,00,00, 10, 
00,00,00,00,20,20,40, 
00, 00, 00, 00,00,00, 60, 
40,80,00,IC,22,42,42, 


0E,CE,7C,00,00,30,30, 
30,00,00,30,30,60, 18, 
00,00,F8,00,F8,00,00, 
C0,00, 78, 8C, IC, 38,30, 
AE,AE,7C,00, 11A4 
00,30,30,00,6C,6C,6C, 
FC,68,FC,68,68, 00, 30, 
C0,CC, 18,30,60, CC, 0C, 
70,00,18,30,60,00,00, 
60,30,18,00,1360 
18, 30,60, 00,30, B4,78, 
30, FC, 30,30, 00,00, 00, 
00,00,00,78,78,00,00, 
60,00,00,00,0C,18,30, 
E6,F6,7C,00,FD6 
18,18,18,00,7C,C6,06, 
06, IC, 06, C6,7C, 00, IC, 
FC, C0, C0, FC, 06, C6, 7C, 
7C,00,FE,06,0C,18,30, 
C6,C6, 7C,00,19F0 
06, C6,7C, 00,00, 30,30, 
30,00,30,30,30,60,18, 
00,00,F8,00,F8,00,00, 
C0,00,78,8C,0C,18,30, 
AC,AC,78,00,116A 
70,50, 70, 00, F8, A8, A8, 
82, D6,82, D6, 7C, 00,7E, 
FE, 9A, 96, EE, D2, B2, FE, 
7C, 00,38,68,D8,B0,E0, 
B0,90,F0,00,2228 
D0,90, F0,00, FE, AA, C6, 
EE,82,EE,28,38, 00,00, 
00,00,00,7E,42, 7E,00, 
90,F0,06,0A,14,28,50, 
9A,82,FE,00, 1BBE 
28,28, 38, 00, FE, 82, FA, 
FA,42,FA,82,FE, 00, 3C, 
FE,82,BE,82,FA,82,FE, 
FE, 00, FE, 82, FA, 16,2C, 
BA,82,FE, 00,224c 
FA,82,FE,00,00,00,70, 
70, 50, 70, D0, B0, E0, 3C, 
00,00,7C,44,7C, 44,7C, 
F0,00, 7C, C6, BA, F6, 2C, 
A4,8C, F8,00,1DA0 
20,00,20,00,00,00,A0, 
50,F8,50,F8,50,00,00, 
00,00,C8,D0,20,58,98, 
D0,00,00,00,10,20,00, 
40,40,70,00,F80 
10, 10, 70, 00,00, 00, A8, 
20,20,F8,20,20, 00, 00, 
00,00,00,00,78,00,00, 
60,00,00,00,08, 10,20, 
88,88,F8,00,B10 
10,10,10,00,00,00,F8, 
F8, 08, 78,08, F8,00, 00, 
00,00,F8,80,F8,08,F8, 
F8, 00,00,00, F8,08,10, 
F8,88,F8,00,1518 
F8, 08, F8,00,00,00,00, 
00,20,00,20,20,40,00, 
00,00,00,F0,00,F0,00, 
C0,00,00,00,F8,08,38, 
E8, A8,F8,00,F68 
20,00,40,00,28,50,A0, 
7E,28,FC,50,50,00,08, 
30,34,08,10,20,58,98, 
30,00,10,20,40,00,00, 
40,40,20,00, AD0 
20,20,40,00,08,4A,3C, 
10,78,20,20,00,00,00, 
00,00,00,78,00,00,00, 
60,00,00,00,08,10,20, 
84,84,78,00,874 
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2r 0 ^£ A H nr' l 0,10, 20 > 20 > 40 > 40 , 00 , 3C, 42, 02, 

Pp’lA’ftA’üc’fQ’ao’ 42,02 ’ 1C > 04 > 84 > 78 , 00 ,IE, 
22,44,84,FE,08,08,#0,3B y 20,40.7E 02 02 FC 

Jf ’ 2 i'\v Vi ' 82 ' 82:7c ’' w - 7E > el: 

1C ’ 22 > 42 > 7C > 84, 84, 78, 00, ED8 
1C » 22 > 42 , 30,04,84,78, 00, 00, 00, 10 
00,00,20,00,00,00,00, 10,00,00, 20,20, 40 00 
04 >18* 20 ’ 40 >20,18,00,00,00,F8,00,F8,00,00, 
00,00,40,30,08,04,08,30,00,78,84,04, 18, 20 

00, 40, 00, 38, 44,04,48, A8, A8,70,00, 9D4 
660 DATA 20,20,20,20,00,00,20,00,50,50,50, 
00,00, 00, 00, 00,50,50,F8,50,F8,50,50,00,20, 
78,A0,70,28,F0,20,00,C0,C8,10,20,40,98,18, 

00,40,A0,40,A8,90,98,60,00,10,20,40,00,00. 
00, 00, 00, 10, 20, 40,40, 40, 20,10,00, F78 
670 DATA 40, 20, 10,10, 10, 20,40, 00,20, A8,70, 

20,70,A8,20,00,00,20,20,F8,20,20,00,00,00, 
00,00,00,00,20,20,40,00,00,00, 78, 00, 00,00, 

00, 00,00, 00,00,00,60,60,00,00,00 08,10,20, 
40,80, 00,70, 88, 98, A8, C8, 88,70, 00, BA0 
^ 0 .P ATA 20 ’ 60 - A0 > 20,20, 20, F8, 00, 70, 88, 08, 
10, 60, 80, F8, 00, 70, 88, 08, 30,08,88,70,00, 10, 

30, 50, 90, F8,10, 10, 00, F8, 80, E0,10, 08, 10, E0, 
00,30, 40, 80, F0,88, 88, 70, 00, F8,88, 10,20,20, 
20,20,00,70,88,88,70,88,88,70,00,1608 
690 DATA 70,88,88,78,08,10,60,00,00,00,20, 
00,00,20,00,00,00,00,20,00,00,20, 20, 40,18 
30,60,00,60,30,18,00,00,00,F8,00,F8,00,00 
00,C 0 ,6 0 ,3 0 ,18,30,60,00,00,70,88,08, 10,20, 
00,20,00, 70,88,08, 68, A8, A8,70,00, E80 
70® DATA 70, E2, E2, B2, FE, E2, E2, 00, FC, E2, E2, 
FC, B2, E2, FC, 00,7E, E0, E0, E0, E0, E0, 7E, 00, FC, 
E2 > E2 > E2, E2, E2, FC, 00, FE, E0, E0, FC, E0, E0, FE, 
00, FE, E0, E0, FC, E0, E0, E0, 00, 7C, E0, E0, EC, E2, 
E2, 7C, 00, E2, E2, E2, FE, E2, E2, E2, 00, 30A2 

Ir 0 -, ? A J A 7C ’ 3Ö ’ 38 ’ 3Ö ’ 38,38,7C, 00, 3E, IC, IC, 
78, 00 > E2,E4,E8,F0, E8, E4, E2, 00, E0, 
E0, E0, E0, E0, E0, FE, 00, E2, F6, EA, E2, E2, E2, E2, 

00,E 2 ,E2,F 2 ,EA,E 6 ,E 2 ,E2,00,7C,E2,E2,E2,E2, 

E2,7C,00,FC,E2,E2,E2,FC,E0,E0, 00,28F0 

720 J? ATA 7C < E2 > E2 ' E2 > EA > E4 . 7A - 00 , FC, E2, E2, 
E2,FC,E4,E2,00,7E,E0,E0,7C,0E, 0E, FC, 00, FE, 

38,38,38, 3 8,38,38, 0 0, E 2, E2 , E2 , E 2,E2,E2,7C, 

c?’fr , «A ,E2 ’ E2 ’ E2,74,38,00 ’ E2 » E2 » E2 > E2 * EA . 
EA,7C,00,C6,EE,7C,38,7C,EE,C6,00,273C 

If 0 ™ A J A E2 > E2 > E2 > E2 > 7C > 38,38,00,FE, 0E,IC, 
38,70,E0,FE,00,7C,82,82,82,FE,82,82, 00, FC, 

82.82, FC, 82,82, FC, 00,7E,80,80, 80,80,80,7E, 
00, FC, 82, 82,82, 82, 82,FC,00,7E,80,80,F8,80, 
80, 7E, 00,7E, 80, 80, F8,80,80,80,00,210A 
740 Dm 7C, 80, 80, 8C, 82, 82, 7C, 00, 82, 82, 82, 
FE,82,82,82,00,38,10,10,10,10,10,38,00,IC, 
08 > ?a’ 08 ' 08 > 48 > 30,00,86, 98, E0, C0, E0, 98, 86, 
00,80,80,80,80,80, 80, FE,00,6C, 92,92,92, 82 
82,82,00,7C,82,82,82,82,82,82,00,18F0 
750 DATA 7C, 82,82,82, 82,82,7C, 00,7C, 82,82, 

82 > In’ 80 > 00 > 7C > 82 > 82 .82,7E, 02,02, 00, 7C, 

82.82.82, FC,84,82,00,7E,80,80,7C,02, 02,FC, 

00,FE,10,10,10,10,10,10,00,82,82,82,82,82, 
£fA 7 £’ 00 ’ 82,82 ’ 82 * 82 ' 44 > 44,38,00,18B0 
780 DATA 82 ,82,82,92,92,92,6C,00,82, 44,28, 
10,28,44,82,00,82,82,82,82,7C,10,10,00,FE, 

04 ,-08, 10, 20, 40, FE, 00, 7C, C6, E6, E6, FE, E6, E6, 

00,7C, C6, E6, FC, E6, E6, 7C, 00, 7C,C6, E0, E0, E0, 

E6,7C,00,FC,C6,E6,E6,E6,E6,7C,00,210E 
770 r , DATA 7E , C0, E0, FC, E0, E0, 7E, 00,7E, C0, E0, 

FC, E0, E0, 60, 00, 7C, C6, E0,EC, E6, E6,7C, 00,C6, 

C6,E6,FE,E6,E6,E6,00, 7C,30,38,38,38, 38, 7C, 

00,3C, 18, 38,38, 38, B8, 70,00, C2, C6, EC, F8, EC 
E6, E2,00, C0, C0, E0, E0, E0, E0, FE, 00,2654 

780 DATA C6, EE, D6, E6, E6, E6, E6, 00, C6, E6, D6, 

EE,E6,E6,E6,00,7C,C6,B6,E6,B6, E6,?C,00,7C, 
C6,E6,E6, FC ,E0,E0,00,7 C ,C6, E 6,B6,EE,E4,7A, 

00 > Zn ' 06 ’ E6 ’ E6, FC ’ E4 > E2 > 00 > 7C > C2, E0, 7C, 0E, 

8E.7C,00,FE,30, 38, 38,38,38, 38, 00, 2886 


oo ’ C6 ’ E6 > E6 > B6 > E6 > 7C - 00, C6, C6, E6, 

^’^ , ^ , o 8,00 ' E6iE6 * E6 - E6 - C6 . D6 ,6C,00,C6, 

ff’I£’i^ ,7C ’ EE,C6 ’ 00 ’ C6 ' C6 > E6 , 66 »3C, 18,18, 
00 - F ?> 08 > 1C * 38, 70, E0, FE, 00, 38,6C, C6, C6, FE 
C6, C6, 00 , FC, C6, C6, FC, C6, C6, FC, 00, 25E0 
800 Dm 7C, C6, C0, C0, C0, C6,7C, 00, FC, C6, C6, 
C6, C6, C6, FC, 00, FE, C0, C0, F8, C0, C0, FE, 00, FE 

30 ' 22’ na’ 00 ' 00 ’ C0, 00, 7C ' C6 > C0 > cc , C6, C6, 7C.’ 

22’ 22’ 22’ C6, FE ’ C6 ' C6 > C6 > 00, 78,30, 30, 30, 30, 
30, 78,00,3C, 18, 18, 18,18, D8, 70, 00, 2480 

22V2 A Jf 22’ CC ’ D8, F0, F8 > DC > CE > 00 > C0,C0, C0, 
ra' 22’22’ FE ' 00 > C6 >EE,D6,C6,C6,C6,C6,00,C6, 

C6,E6,D6,CE,C6,C6,00,7C,C6,C6,C6,C6,C6,7C 

?!’22’22’2 6 ’ C6,FC ’ C0 ' C0 ' 00 - 7C - C6 -C6,C6,D6; 
2oA 7 2l 00)FC ' C6 > C6 > C6 > EC,CC,C6,00,2C1C 
ff®o2 A ï A 7C ’ C6 ’ C0 ’ 7C > 06 > C6 >7C,00,FE,38,38, 

rfi’rfi’?2’22’22’2 6 ’ C6 ’ C6 ’ C6,C6,C6,7C > 00 ' C6 ' 

22’22’22’2 c ’ 6C - 38 ' 00 - C6 > C6 * C6 -d6,d6,d6, 7 c, 

00, C6, EE, 7C, 38,7C, EE, C6, 00, C6, C6, C6, Cö! 7C 
38,38,00,FE,0E,IC,38,70,E0,FE, 00,20F6 
830 DATA FE, 82, BA, 82, BA, AA, EE, <5<d, FC, 86, BA, 
82,BA,86,FC,00,FE,82,BE,A0,BE,82, FE, 00, FC, 
86,BA,AA,BA,86,FC,00,FE,82,BE,84,BE,82,FE, 

22’ 22’ 82, BE ’ 84 ’ BC > A0 , E0 > 00 . FE, 82, BE, A2, BA, 
82,FE,00,EE,AA,BA,82,BA,AA,EE,00,2884 
840 DATA 38,28,28,28,28,28,38,00,38,28,28, 

28 ' E8 > ?a’ 2 0, 00 ’ EE ’ BA ’ B6 > 8C > B6 * BA * EE > 00. E0, 
A0 >2?’ BE ’ 82 ' FE - 00 ’ EE ’ BA > 92 > AA > BA > AA. EB 
00,EE,BA,9A,AA,B2,BA,EE,00,FE,82, BA, AA,BA 
82, FE, 00, FE, 82, BA, 82, BE, A0, E0, 00, 2332 

22 0 tï? A I A FE ’ 82 > BA > AA. B8 > 8A, FE, 00, FE, 82, BA 
82 > Bö. EA ,EE,00,FE,82,BE,82,FA, 82, FE, 00, FE, 
82 ’ EE ’ 28 > 28 > 28 , 38,00, EE, AA, AA, AA, BA, 82, FE, 
001EE ’AA,AA,BA,D6,6C,38,00,EE,AA, BA,AA,AA, 
82,FE,00,EE,BA,D6,6C,D6,BA,EE,00,26BE 
860 DATA EE, AA, BA, D6,6C, 28, 38, 00, FE, 82, F6, 
™ ’ 82 * FE < 00 > 00 > 00 . F8 > 88,F8,88,88,00,00, 
00, F 8 , 88 , F 0 , SS, F8, ®0, 00, 00, F8, 80, 80, 80, F8, 

00,00, 00, F0, 88,88,88, F0,00, 00,00 F8, 80, F0 
80, F8,00, 00,00,F8,80,F0,80,80,00,1EDC 

!ÏZ 0 J A lo o o ’ 22 ’ F8 > 80 « 98 > 88 - F8 ,00.00, 00,88, 
88 > F8 > 88 > 88,00, 00,00, 70,20, 20, 20, 70, 00, 00, 

00,70,20,20, 20, C0,00,00, 00,88,90, E0, 90, 88, 

00, 00,00, 80,80,80,80, F8,00,00, 00, 88, D8, A8 

88 > 88 > 00 . 00 .00.88,C8,A8,98,88, 00, 15B0 
880 Dim 00, 00, F8,88,88,88, F8,00, 00, 00, F8, 
88,F8,80,80,00, 00,00,F8,88,F8,08,08,00,00, 

00 > f?’ 88 ’ F8,90 »88.00,00,00, F8,80, F8, 08, F8, 

o o ’ra’ A 0 ’ F8 ’ 20 ’ 20 * 20 » 20 > 00 > 00 > 00 • 88 . 88 , 88 , 

88,F8,00,00,00,88,88,88,50,20, 00,1720 

=2 0 o£ A J a 00 • 00 > 88 . 88 .A8,A8,70,00,00,00, 88, 
50,20,50,88,00,00,00,88,88,50,20,20,00,00, 
00 f F8,10, 20 ,40,F 8 ,0 0 ,IC,22,22,7C,44,88,88, 
00 ’3C,22,42,7C,84,84,F8,00,IC,22,40,40,80, 

84,78,00,3C,22,42,42,84,84,F8,00,1308 
900 BA7A IE, 20,20, 7C, 40, 80, F8, 00, IE, 20, 20, 
Jo’ 40 ' 80 » 80 f 00 * iC, 22, 40, 4C, 82, 84,78, 00,22, 

aMI’I^’ 84 ’ 88 ’ 88 ’ 00 ' 1C ' 08 » 10 » l 0 .20,20, 70, 
qo’^’a!’ 08,08, 10 > 90 > 60 . 00 . 22 ,24,48,70,50, 
88,88,00,10,10,20,20,40,40.7C,00, F5A 

Rl 0 /i? A Jf JJ’ 26) 5A > 42 > 44 > 84,84,00,22,22,52, 

54,4C, 88, 88, 00, IC, 22, 42, 44, 84, 88, 70, 00,3C 

^’??’^’J!’ 80 ’ 80 ’ 00 - ic ’ 22 ’ 42 ’ 44 ’ 94 > 88 . 74 : 

aa' n*' 22, 42 > 44 > 78 > 84 . 84 . 00 .IC.22,40,38,04, 

88,70,00,3E,08,08,10,10,20,20,00,100A 

?? 0 >io A Tf 22 « 22 > 44 > 44 > 88 ,88,70,00,22, 22,24, 
ft ’ 4 f’ 48 > 30 > 00 » 42 . 42 > 44 .8 4 ,A8,A8,50,00,42, 

28 > 44 > 84 > 00 > 22,42, 44,28,10,20,20, 
oo'Za’ 02 ‘ 06 »3 8 . 40 ,80,70,00,00,00,38,04,78, 

88, 78,00,20,20, 58, 64, 44, C8, B0,00, FD6 
?? 0 ,? A J A 00 > 00 >38,44,4®,88,70,00,02,02,34, 

1?’ f 4 ’ 98 ’ 68 ’ 00 ' 00 » 00 »38,44, 70,80,70, 00, 04, 
f a’ Ja ’Z C ’ 10 ’ 20 ’ 20 » 00 » 00 > 00 ,34,4C,4C,38,08, 

J^^aa’ 78,44 ’ 44 ’ 88,88 ’ 00 , 08 , 00 . 30 . 10, 10, 

20,70,00,04,00,18,08,08,10,90, 60, C2E 
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940 DATA 10,10,24,28,30,50,48,00,18,08,10, 
10, 10, 20,70,00,00,00,68,54,54, A8, A8, 00,00, 
00,58,64,44,88,88,00,00,00,38,44, 44,88,70, 
00,00,00,58,64,64,B8,80,80,00,00,34,4C,4C, 
30,08,08, 00, 00, 58,64, 40, 80, 80, 00, E1C 
950 DATA 00, 00,3C, 40,78, 08, F0, 00, 10,10,78, 
20, 20, 48,30, 00, 00,00, 48, 48, 48, 90, 68, 00, 00, 
00,44,44,44,28,30,00,00,00,44,54,54,A8,50, 
00,00,00,44,28,30,50,88,00,00,00,44,44,4C, 
30,08,70,00,00,7C,08,30,40,F8,00, CF0 
960 DATA 20, 50, 88, 88, F8,88, 88,00, F0, 48, 48, 
70,48,48, F0, 00, 30, 48, 80, 80,80, 48,30, 00, E0, 
50,48,48,48,50,E0,00,F8,80,80,F0,80,80,F8, 

00, F8, 80,80, F0,80, 80, 80,00,70, 88,80, B8,88, 
88,70,00,88,88,88,F8,88,88,88,00,1DC0 
970 DATA 70,20,20,20,20,20,70,00,38,10,10, 
10,90,90,60,00,88,90,A0,C0,A0,90,88,00,80, 
80,80,80,80,80,F8,00,88,D8,A8, A8,88, 88,88, 
00, 88, C8, C8, A8,98, 98,88, 00, 70, 88, 88, 88, 88, 
88,70,00,F0,88,88,F0,80,80,80,00,1C48 
980 DATA 70,88,88,88,A8,90,68,00,F0,88,88, 
F0,A0,90,88,00,70,88,80,70,08,88,70,00,F8, 
20,20,20,20,20,20,00,88,88,88,88,88,88,70, 
00,88,88,88,88,50,50,20,00,88,88,88,A8,A8, 
D8,88,00,88,88,50,20,50,88,88,00,1A98 
990 DATA 88,88,88, 70,20,20,20,00, F8,08,10, 
20, 40,80,F8,00,00,00,70,08,78,88,78,00,80, 
80,B0,C8,88,C8,B0,00,00,00,70,88,80,88,70, 
00,08,08,68,98,88,98,68,00,00,00,70,88,F8, 
80,70,00,10,28,20,F8,20,20,20,00,1550 
1000 DATA 00,00, 68, 98, 98, 68, 08, 70, 80, 80, F0 
,88,88,88,88,00,20,00,60,20,20,20,70,00,10 
, 00,30,10, 10,10,90,60,40,40,48,50,60,50,48 
, 00,60,20,20, 20, 20,20,70,00,00,00,D0,A8,A8 
, A8, A8, 00, 00, 00, B0, C8, 88,88,88, 00, 1338 
1010 DATA 00,00,70,88,88,88,70,00,00,00, B0 
, C8, C8, B0, 80, 80, 00,00, 68,98, 98,68, 08,08,00 
,00,B0,C8,80,80,80,00,00,00, 78,80, F0, 08, F0 
, 00,40, 40, F0, 40, 40, 48, 30, 00, 00, 00, 90, 90, 90 
,90,68,00,00,00,88,88,88,50,20,00,1568 
1020 DATA 00,00, 88, A8, A8, A8,50, 00, 00, 00, 88 
,50,20,50,88,00,00,00,88,88,98,68,08,70,00 
, 00, F8, 10, 20,40, F8, 00, 86,98, E0, C0, E0, 98,86 
,00,80,80,80,80,80,80,FE,00,6C,92,92,92,82 
,82,82,00,7C,82,82,82,82,82,82, 00, 1972 


10 HEM DEELS 

20 REM behoort bij PRINT OFFICE 
30 REM 

40 CLS:SCREEN©:VIDTH80 
50 CLEAR200, &HCC90 

60 PRINT”De data's worden in het geheugen 
gePOKEd.” 

70 PRINT”Even geduld aub....” 

80 FORI=&HCC90TO&HD33ESTEP64 
90 CG!=0 

100 FORJ=ITO1+63 

110 READHS 

120 H=VAL (”&H"+H$) 

130 CG!=CG!+H 
140 POKEJ.H 
150 NEXTJ 
160 READCGS 

170 IFVAL<”&H”+CG$)< >CG!THENPRINT: PRINT”DA 
TAFOUT in regelPEEKC&HF6A3)+256*PEEK<&H 
F6A4):BEEP:END 
180 NEXTI 
190 CLS 

200 PRINP’U kunt het geheugengebied CC90h- 
D33Eh nu saven met:” 

210 PRINT 

220 PRINT”BSAVE"+CHR$(34)+”DEEL2”+CHR$(34) 
+",&HCC90,&HD33E,&HCC90” 

230 PRINT 


240 PRINT”Vergeet niet dit basic-programma 
te saven!” 

250 END 
260 REM 

270 DATA 21,00,00,11,00,10,01,00,08,CD,6D, 
CD,21,00,00, 11,00,28,01,00,08,CD,6D,CD,21, 
C0,C3,11,08,12,01,D0,00,CD,5C,00,21,C0,C3, 
11,08,13,01,D0,00,CD,5C,00,21,38,BC,11,80, 
11,01,50,00,CD,5C,00,21,00,20,01,FC2 
280 DATA 00,08,3E,1B,CD,56,00,21,00,30,01, 
00,08,3E,1B,CD,56,00,21,7D,CD,11,80,1B,01, 
60,00,CD,5C,00,21,DD,CD,11,00,IC,01,18,00, 
CD,5C,00,21,DF,CE, 11,C0,1F,01,20,00, CD, 5C, 
00,21,FF,CE,11,80,07,01,30,00,CD, 11C1 
290 DATA 5C,00,21,2F,CF,11,80,27,01,30,00, 
CD,5C,00,21,5F,CF,11,00,38,01,E0,03,CD,5C, 
00,11,F5,CD,06,IA,C5,IA,13,D5,21,00,10,11, 
08,00,47,19,10,FD,Dl,06,08,IA,CD,4D,00,13, 
23, 10, F8, Cl, 10, E4,21,00,30,11, DF, 12EA 
300 DATA CE, 06,20, C5, IA, 06,40, CD, 4D, 00, 23, 
10, FA, 13, Cl, 10, F2,21,00,40,01,00, B4,3E, 20, 
CD,6B,01,C9,CD,4A,00,EB,CD,4D,00,EB,13,23, 
0B, 78, BI, 20, Fl, C9, FF, E0, 00,01, FF, A8,04,01, 
FF,B0,IC,01,FF,B8,14,01,16,A0,64,1935 
310 DATA 01,2C, A0, 30,06,42,A0,34,06,58,A0, 
38,06,16, B8,3C, 0C, 2C, B8, 44,0C, 42, B8, 40, 0C, 
58, B8, 48,0C, 16, D0, 4C, 0D, 2C, D0,50,06, 42, D0, 
54,08,58, D0,5C, 04,6E, B8,58, 04,6E, D0, 74,01, 
6E,A0,60,0D,16,A0,2C,01,97,AA,68,150C 
320 DATA 00,87,12,68,00,D0,00,00,00,00,00, 
00,00,3F,42,68,02,55,C8,74,01,50,14,2C,01, 
8C, Cl, 58,04,87,23,5C, 04, D0, 00,00,00, 13,00, 
00,00,00,00,00,00,00,14,FF,FF,00,00,00,00, 
00,00,15,03,03,03,03,03,03,03, 03, AB4 
330 DATA 16, C0,C0,C0,C0,C0,C0,C0,C0, 17,00, 
00, 00,00, 00,00, FF, FF, 18, FF, FF, C0, C0, C0, C0, 
C0,C0, 19,FF,FF, 03, 03,03,03,03,03,1A,C0,C0, 
C0, C0, C0, C0, FF, FF, 1B, 03,03, 03, 03,03, 03, FF, 
FF,2E,00,00,00,00,00,30,30,00,3A,1A75 
340 DATA 00,30, 30,00,30,30,00,00,80,FC, E2, 
E2, E2, E2, E2, E2, E2,81, E2, FC, E0, E0, E0, E0,00, 
00, 82, FC, E2, E2, E2, E2, E2, E2, E2, 83, FC, E4, E4, 
E2, E2, 00, 00, 00,84,7C, 38,38,38,38,38, 38, 38, 
85,38,38,38,7C,00,00,00,00,86,E2,2099 
350 DATA E2,F2,F2,EA,EA,EA,E6,87,E6,E2,E2, 
00,00,00,00,00,88,FE,38,38,38,38,38,38,38, 
89, 38,38,00,00,00,00,00, 00,8A, 00, 00, 00,00, 
00, 00, 00,00,8B, 00, 00,00, 00,00, 00, 00, 00, F5, 
00,00,00,00,00,00,00,00,7B,00,60, 1087 
360 DATA 60, 00,60, 60, 00,00, 7D, 00, 00, 00, 00, 
00,60,60,00, 1B,1B,45,45,1B,75,75,75,15,15, 
15,15,CB,CB,CB,CB,F5,F5,1B,1B,1B,1B,1B,1B, 
1B,1B,1B,1B,1B,1B,1B,1B,FF,81,81,81,81,81, 
81, FF, FF, FF, FF, FF, FF, FF, FF, FF, E2, 1959 
370 DATA E2,F2,EA,E6,E2,E2,00,7C,E2,E2,E2, 
E2,E2,7C,00,00,60,60,00,60,60, 00,00, 00, 00, 
00,00,00,00,00,00,47,47,47,47,47,47,47,47, 
40,40,40,40,40,40,40,40,1B,1B, 1B, 1B, 1B, 1B, 

IB, 1B,1B,1B,1B,1B,1B,1B,1B,1B,1B, 124D 

380 DATA 1B,1B,1B,1B,1B,1B,1B,0B,0B,0B,0B, 
0B,0B,0B,0B,00,00,00,00,00,00,00,00,00,00, 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 
00,00,00,00,00,00,00,00,7C,E2,E2,E2,E2,F2, 
7C,00,00,00,00,00,00,00,00,00,00,687 
390 DATA 00,00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,38,78,38,38,38,38,38,00, 00,00, 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 
00,00,00,00,00,00,00,00,7C,8E,0E,IC,70,E0, 
FE,00,00,00,00,00,00,00,00,00,00,54A 
400 DATA 00,00,00,00,00,00,00,00,00,00,00, 
00,00,00,00,7C,8E,0E,7C,0E,8E,7C,00,00,00, 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 
00,00,00,00,00,00,00,00,IC,3C,5C,9C,FE,IC, 

IC, 00,00,00,00,00,00,00, 00,00, 00, 532 
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410 DATA 00,00,00,00,00,00,00,00 00 00 00 
00,00, 00, 00 , FC, E0, E0,FC,02,02,FC,00,00 ,00 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 ; 00 , 00,00 
00, 00, 00, 00, 00 , 00 , 00 , 00 , 7 Q, E 0 , E0, FC, E2, E2, 
7C,00,00,00,00,00,00,00,00,00,00,A30 
420 DATA 00,00,00,00, 00 , 00 , 00,00 00 00 00 
00,00,00,00,FE,0E,IC,38,38,38,38,00,00,00, 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00,00 00 00 

00,00, 00 , 00 , 00 , 00 , 00 , 00 ,7C,E 2 ,E2,7C, E2, E 2 , 
7C,00,00,00,00,00,00,00,00, 00 , 00 , 704 
430 DATA 00,00,00,00,00,00,00,00,00,00,00 

00,00,00,00,7C,E2,E2,7E,02,02,7C, 00,00,00, 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00,00 

00,00,00,00,00,00,00,00,FF,92,92, FF, 92, 92, 
FF, 92, 92, FF, 92,92, FF, 92, 92, FF, FF, FEB 
440 DATA 49,49,FF,49,49,FF,49,49,FF,49,49, 
FF,49,49,FF,01,01,01,01,01,ii,19.FD.FD,19, 

11,01,01,01,01,01,80,80,80,80,80,88,98, BF, 
BF,98,88,80,80,80,80,80,01,01, 0F.0F, 01,01, 
30,78,FC,30,30,31,03,03,01,00,00,1549 
450 DATA 80, C 0 , C0, 8 C, 0C, 0C, 3F, IE, 0C, 80,80, 
F0,F0,80,80,00,00,00,00,00,08,0C,7E,7E,0C, 
08,00,00,00,00,00,FF,FF,FF,FF,FF,F7,F3,81, 
81, F3, F7,FF,FF,FF,FF,FF,7F,C0,80,80,80,81, 

83.87.81.81.81.80.80.80, C0, 7F, FE, 2067 

460 DATA 03,01,01,01,81,Cl,El,81,81,81,01, 
01,01,03,FE, 7F.C0,80,80,80,81,83,87,87,83, 

81.80.80, 80, C0.7F,FE, 03,01, 01,01,01,01, El, 
El, 01,01,01,01,01, 03 ,FE,7F,C 0 , 80 , 80 , 80 , 81 , 

81,81,87, 83,81,80,80, 80, C0, 7F, FE, 1A9C 
470 DATA 03,01,01,01,81,81,81,El,Cl,81,01, 
01,01,03,FE,7F,C0,80,80,80,80,80,87, 87,80, 

80.80.80.80, C0,7F,FE,03,01,01,01,81, Cl, El, 
El,Cl,81,01,01,01,03, FE, 00, 7F, 40, 5F, 50, 50, 
53,53,53,53,53,53,53,70.10,1F.00, 182C 

480 DATA FC,04,FF,01,01,89,91,Al,Cl,Al,91, 
89,01,01, FF, 00, 7F, 40, 5F, 50,50,53,53, 53,53, 
53,53,53,70,10,1F,00,FC,04,FF,01,01,Fl,89, 
89,89,Fl,91,89,01,01,FF,00,7F,40,5F,50,50, 
51,53,53,53,53,53,51,70,10,1F.00, 1812 
490 DATA FC,04,FF,01,01,F9,81,81,81,81,81, 
F9,01,01,FF,00,1F,10,14,10,14,10,14,10,3F, 
40, FF, 84,84, FC, FF, 00, F8, 08,28,08,28, 08,28, 
08,FC,02,FF,01,55,01,FF,00,00, EE, AA, EE, AA, 
AE,00,00,08,08,EE,AA,EE, 00,00, 00, 17EC 
500 DATA 00,EE,8A,8A,8A,EB,00,00,02,02,EE, 
8A,EE,00,00,00,EE,AA,EE,AA,AE,00,00,00,08, 
0C,7E,7E,0C,08,00,FF,11,75,75,75,11,FF,FF, 
FF, F7, F3,81,81, F3, F7, FF, F8, F0, F0, F8,9C, 0E, 
07,03,01,00,00,00,00,00,00,00, 00 ,iaBD 
510 DATA 00,00,00,00,00,00,80, C0,C0, 00,00 

00, 00,00, 00,08,0C,FE,FF,FF,FE,0C,08,00,00 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00,00 00 
00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 
00,00, E2, E2, F2, EA, E6, E2, E2,00, 00, C6C 
520 DATA 00, 00,00,00,00,00,00,7C, E2,E2,E2, 
E2, E2,7C, 00,00,00,00,00,00,00, 00, 00 , 00 ,60 
60,00,60,60,00,00,00,00,00,00,00,00,00 00 

00,00,00,00, 00,00,00,00,F7,F7,F7,F7,F7,F8 
FF,FF,F0,EF,EF,EF,EF,EF,EF,EF,E8,170C 
530 DATA EC, 2E, 2F, 2F, 1F, FF, FF, 0F, F7, F7, F7, 

F7, F7, F7, F7, 00, 00,30,2C,30,30,2C,30,30,2C, 
30,30,2c,30,30,2C,30,30,2C,30,30,2C, 30,30, 
2C,30,30,2C,30,30,2c,30,30,2C,30,30,2C,30, 
30,2C, 30,30,2C, 30, 30, 2C, 30,30, 2C, 12F5 


10 REM DBEL3 

20 REM behoort bij PRINT OFFICE 
30 REM 

40 CLS: SCREEN0 :VIDTH80 
50 CLEAR200, &HCC90 

60 PRINT De data*s worden in het geheugen 
gePOKEd» 


70 PRIFT'Even geduld aub....” 

80 FORI=&HCC90TO&HD9D0STEP64 
90 CG!=0 
100 FORJ=ITO1+63 
110 READHS 
120 H=VAL(”&H"+HS) 

130 CG!=CG!+H 
140 POKEJ,H 
150 NEXTJ 
160 READCGS 

170 IFVAL (”&H"+CG$)OCG! THENPRINT: PR INT”DA 
TAFOUT in regel:”;PEEK<&HF6A3)+256*PEEK(&H 
F6A4):BEEP:END 
180 NEXTI 
190 CLS 

200 PRINT”U kunt het geheugengebied CC90h- 
D9F0h nu saven met:" 

210 PRINT 

220 PRINT”BSAVE”+CHRS <34)+”DEEL3”+CHR$(34) 
+",&HCC90,&HD9F0” 

230 PRINT 

240 PRINT”Vergeet niet dit basic-programma 
te saven!!” 

250 END 
260 REM 

270 DATA CD,2C,CE,CD,35,CE,CD,3E, CE, CD, 4A, 
CE,CD,DD,Dl,CD,A3,CC,C9,CD,9F, 00,47, CD,B7, 
00, D8,78, CD, AB, 00, D2, A3, CC, C2, Dl, CC, FE, 20, 
30,05,CD,43,CD,18,07,FE,7F,20,05,CD,78,Dl, 
18,07, FE, F0, 38,06, CD, A0, CD, C3, A3, 2466 
280 DATA CC,F5,CD,CB,Dl,3A,AA,FC,FE,01,20, 
22,11,3F, 00, 19,3A, D6, DD, 5F, 3E, 3F, 93, 28,0E, 
47,2B,CD,74,01,23,CD,77,01,2B,10,F5,18,05, 
3E,00,32,AA,FC,18,05,3A,D6,DD,5F,19,Fl,CD, 
77,01,F5,21,DF,17,11,20,00,3A,DC,19D0 
290 DATA F3,47,19, 10, FD, 3A, AA, FC, FE, 01,20, 
18,19,3A, DD, F3,5F,3E,20,93,28,0C,47,2B,CD, 
4A,00,23,CD,4D,00,2B,10,F5,18,05,3A,DD,F3, 
5F, 19, Fl, CD, 4D,00,CD,Dl,CF,C3,A3,CC,FE,12, 
CA, DB, D0, F5,3E, 00, 32, AA, FC, Fl, FE, 1EDC 
300 DATA IC,CA,B3,CF,FE,1D,CA, IC,CF, FE,IE, 
CA, 9E, CE, FE, 1F,CA, DD, CE,FE,0B,CA,48,D0,FE, 
05, CA, 65, D0, FE, 15, CA,7B,D0,FE,14,CA,8A,D0, 
FE, 18, CA, BD, D0, FE, 07, CA, EE, D0, FE, 16, CA, F7, 
D0,FE,17,CA,10,Dl,FE,0E,CA,2B, Dl, 2898 
310 DATA FE, 09, CA, 0E, D2, FE, 08, CA, A9, Dl, FE, 

OD, CA,9C,D0,C9,47,3E,06, CD, 41,01, E6, DD, FE, 
E0,20,0A,3E,07,CD,41,01,E6,03, FE, 03, C8,3E, 
00,32,AA,FC,78,FE,F0,CA,09, D3, FE, Fl, CA, 74, 
D3, FE, F2, CA, 84, D3, FE, F3, CA, 04, D4,2536 

320 DATA FE,F4,CA,0D,D4,FE,F5, CA,16,D4,FE, 
F6, CA, 68, D4, FE, F7, CA, D6, D4, FE, F8, CA, E4, D4, 
FE,F9,CA,F0,D4,C9, 2A,DB,DD,16, 00, 3A, D7, DD, 
5F,19,11,00,18,06,10,C5,01,20,00, CD, Cl, D2, 

OE, 20,09,Cl,10,F3,CD,IA,CE,C3,23,25E6 

330 DATA CE,21,AB,1A,3A,D2,DD,C3,53,CE,21, 
C4,IA,3A,D6,DD,C3,53,CE,21,A4,IA,3A,D5,DD, 
C3,53,CE,21,B2,IA, 3A,D9,DD, C3,53, CE, 21, D2, 
IA,3A,DA,DD,C3,53,CE,CD,7A,CE,21,B9, IA, 3A, 
D3,DD,C3,54,CE,21,CB,IA,3A,D8,DD,2270 
340 DATA C3,54,CE,3C,32,CD,DD,IE,64,CD,66, 
CE,IE,0A,CD,66,CE,IE,01,C3,66,CE,16,30,3A, 
CD, DD,93, 38,06, 32,CD, DD,14,18,F4,7A, CD,4D, 
00,23, C9,21,00,00, 11,08, 00, 3A, D3, DD, FE, 00, 
28,04,47,19,10,FD,01,00.00.3A,D4,1900 
350 DATA DD,4F.CB,21,CB,21,CB,21,11,00,38, 
C3,Cl,D2,3E,06,CD,41,01,CB, 4F, CA, B7, CE, 3A, 

DC, F3,FE,01,CA,F6,CE,3D,32,DC,F3,C3,FF,D2, 
2A,DF,DD,BB,2A,DB,DD,E7,C8,11,40,00,19,22, 
DB, DD, CD, F5, D2, C3, EF, CD,3A,D2,DD,2555 

360 DATA 3C, FE, 08,20, 02,3E, 00, 32, D2, DD, C3, 

DD, Dl, 3E, 06, CD, 41,01, CB,4F,CA,F6,CE, 3A,DC, 
F3,FE,10,CA,B7,CE,3C,32,DC,F3,C3,F5, D2, 2A, 
DD, DD, EB, 2A, DB, DD, E7,C8,11,C0,FF,19,22,DB, 
DD, CD, FF,D2,C3, EF,CD,3A,D2,DD,3D,2682 
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370 DATA FE,FF,20,02,3E,07,32,D2,DD,C3,DD, 
Dl,3E,06,CD,41,01,CB,4F,CA,8F,CF,3E, 06,CD, 
41,01,CB,47,CA,9F,CF,3E,06,CD,41,01,CB,67, 
CA, 0C,CF,3A, DD,F3,FE,01,28,07,3D,32,DD,F3, 
C3,EB,D2,3A,D7,DD,FE,00,28,0A,3D,1F64 
380 DATA 32, D7, DD, CD, EB,D2,C3, EF, CD,3A,DC, 
F3,FE,01,28,17,3D,32,DC,F3,3E,20,32,D7,DD, 
32, DD, F3,3E, 3F, 32, D6,DD,CD,FF,D2,C3,EF,CD, 
3E,3F,32,D6,DD,3E,20,32,D7,DD,32,DD,F3,3A, 
D5,DD,FE,00, C2,F6,CE,C3,EF, CD, 3A, 270A 
390 DATA D7,DD,FE,20,C8,3C,32,D7,DD,CD,El 
D2,C3,EF,CD,3A,D4,DD,5F,3A,D3, DD, FE, 00,20, 
02,3E,F0,93,32,D3,DD,C3,3E,CE,3E,06,CD,41, 
01, CB, 4F, CA, 24,D0,3E,06,CD,41,01,CB,47,CA, 
34,D0,3E,06,CD,41,01,CB,67,CA,CD,21FB 
400 DATA CE,3A,DD,F3,FE,20,28,07, 3C, 32, DD, 
F3, C3, El, D2, 3A, D7, DD, FE, 20,28,0A, 3C, 32, D7, 
DD,CD,El,D2,C3,EF,CD,3A,DC, F3, FE, 10, 28, 16, 
3C, 32, DC, F3, 3E, 00, 32, D7, DD, 32, D6, DD, 3C, 32, 
DD,F3,CD,F5,D2,C3,EF, CD,3E, 00, 32, 2494 
410 DATA D6, DD, 32, D7, DD, 3C, 32, DD, F3, 3A, D5, 
DD, FE, 4F, C2, B7, CE, C3, EF, CD, 3A, D7, DD, FE, 00, 
C8,3D,32,D7,DD,CD, EB,D2,C3,EF,CD,3A, D4, DD, 
5F,3A,D3,DD,83,FE,F0,20,02,3E, 00, 32, D3, DD, 
C3,3E,CE,3A,D7,DD,32,D6,DD,3A,DC,2855 
420 DATA F3,3D,5F, 3A,D5,DD,93,32,D5,DD,CD, 
IA,CE,CD,23,CE,3E,0B,C3,A2,00,CD,CB,Dl,3A, 
D6,DD,06,00,4F,09,3E,40,91,4F,3E, 20, CD, 6B, 
01,C3,EF,CD,3E,00,32,D6,DD,32, D7, DD, 3C, 32, 
DD,F3,C3,65,D0,CD,CB, Dl, 3A, D6, DD, 21D0 
430 DATA 3C,4F,06,00,3E,20,CD,6B,01,C3,EF, 
CD,3E,00,32,D6,DD,32,D7,DD,3C,32,DD,F3,CD, 
IA,CE,3A,DC,F3,FE,10,CA,B7,CE,3C,32,DC,F3, 
CD,F5,D2,C3,EF,CD,21,00,38, 01,20,00,3E, 00, 
CD,56,00,3A,D3,DD,E6,FC,32,D3,DD,20E2 
440 DATA 3A,D4,DD,EE,05,32,D4,DD,C3,3E, CE, 
3E,06,CD,41,01,CB,4F,CA,50,D2,3A,AA,FC,EE, 
01,32,AA,FC,C9,3A,DB,F3,EE,01,32,DB,F3,C9, 
2A,DD,DD,22,DB,DD,3E,00,32,D5,DD,32, D6, DD, 
32,D7,DD,3E,0B,CD,A2,00,C3,EF,CD,23FB 
450 DATA 2A, DF, DD, 22, DB, DD, 3E, 40, 32, D5, DD, 
3E,00,32,D6,DD,32,D7,DD,3E,0B,CD,A2,00,C3, 
EF, CD, CD.CB,Dl,11,40,00,19,06,40,2B,CD,74, 
01, FE, 20,20,02,10, F6, 78, FE, 40, CA, 9C, D0, 3A, 
D7,DD,4F,78,91,38,0A,FE,20,30,16,1E06 
460 DATA 3C,32,DD,F3,18,09,78,3C,32,DD,F3, 
AF, 32, D7, DD, 78,32, D6, DD, C3, EF, CD, 78, D6,1F, 
32, D7, DD, 78,32, D6, DD, 3E, 20, 32, DD, F3, C3, EF, 
CD, 3E, 00,32,AA,FC,3E,06,CD,41,01,CB,4F,CA, 
8A, D2,CD, CB,Dl,16,00,3A,D6,DD,5F,2289 
470 DATA 4F,19,E5,Dl,23,3E,3F,91,28,06,4F, 
06,00, CD, Cl, D2, EB, 3E,20,CD,77,01,C3,EF,CD, 
3A, D6, DD,FE,00,CA,78,Dl,3A,DD,F3,FE,01,28, 
0A,3D,32,DD,F3,CD,EB,D2,C3,87,Dl,3A,D7,DD, 
3D, 32, D7, DD, 18, F1,2A, DB,DD,11,40,21A9 
480 DATA 00,3A, DC, F3, 3D, FE, 00, C8, 47, 19, 10, 
FD,C9,3A,D2,DD,21,00,2C,11,00,14.3C.47,19, 
10,FD,22,DB,DD,22,DD,DD,11,00,10,19,22,DF, 
DD,3E,00,32,D5,DD,32,D6,DD,32,D7,DD,3E,0B, 
CD,A2,00,CD,11,CE,C3,EF,CD,3A, D8,1CF6 
490 DATA DD, 47, 4F, 3A, D6, DD, B8,38,07, F5,78, 
81,47,Fl,18,F6,78,FE,40,D2,9C,D0,3A, D7, DD, 
4F,78,91,FE,20,30,0E,3C,32,DD, F3, 78,32, D6, 
DD,CD,IA,CE,C3,4A,CE,78,D6,1F,32,D7,DD,78, 
32,D6,DD,3E,20,32,DD,F3,C3,EF,CD,23DB 
500 DATA 3E,00,32,AA,FC,CD,CB,Dl,E5,3A,D5, 
DD,47,3E,4F,90,28,IC,E5,21,00,00,11,40,00, 
47,19,10,FD,E5,Cl,El,E5,19,E5,Dl,El,09, EB, 
09,EB,1B,2B,CD,Dl,D2,El,3E,20,01,40,00,CD, 
6B,01,C3,EF,CD,CD.CB,Dl,E5,Dl, 01, 1FCE 
510 DATA 40,00,09,3A,D5,DD,47,3E,4F,90,28, 
13, E5, D5, 21,00, 00, 11,40, 00, 47, 19, 10, FD, E5, 
Cl,Dl,El,CD,Cl,D2,2A,DF,DD,11,C0,03,19,3E, 
20,01,40,00,CD,6B,01,C3,EF,CD, CD, 74, 01, EB, 
CD,77,01,EB,13,23,0B,78,BI,20, Fl,1B27 


520 DATA C9, CD, 74,01,EB,CD,77,01, EB,1B,2B, 
0B, 78, BI, 20, Fl, C9,3A, D6, DD, 3C, 32, D6, DD, C3, 
IA, CE,3A, D6,DD,3D,32,D6,DD,C3,IA,CE,3A,D5, 
DD,3C,32,D5,DD,C3,23,CE,3A,D5,DD, 3D, 32, D5, 
DD,C3,23,CE,3A,D4,DD,FE,04,28,08,228B 
530 DATA 33, 33,3A, D3, DD, C3, Dl, CC, 3A, D5, DD, 
FE,4F,C8,3A,D6,DD,FE,3F,C8,CD, CB, Dl, 3A, D6, 
DD,5F,19,3A,D3,DD, 06,02,C5,06, 02,CD, 77,01, 
3C,11,40,00,19,10,F6,11,81,FF,19,Cl,10,EC, 
CD,EF,CD,3A,D6,DD,FE,3E,CA,9C,D0,2270 
540 DATA C6,02,32, D6, DD, 3A, DD, F3, FE, 1F, 30, 
08, C6, 02,32, DD, F3, C3, IA, CE, 3E, 20,32, DD, F3, 
3A, D6, DD, D6,1F, 32, D7, DD, C3, EF, CD, 3A, D8, DD, 
3C,FE,21,20,02,3E,01,32,D8,DD,C3,4A, CE, CD, 
CB,Dl,11,00,00,E5,B5,06,40,CD, 74,2160 
550 DATA 01, FE, 20,20, 04,23,14,10, F5, El, D5, 
11,3E,00,19,Dl,06,40,CD,74,01,FE,20,20,04, 
2B,IC,10,F5,7A,93,F5,28,0D,FE,FF,28,09,FE, 
01,28,05,Fl,30,05,18,20,Fl,El,C9,CB,3F,47, 
El,E5,C5,06,3F,23,CD,74,01,2B,CD,198D 
560 DATA 77,01,23,10,F5.3E,20,CD,77,01,Cl, 
10,E8,18,21,7B,92,CB,3F,47,El,E5,C5,11,3F, 
00,19,06,3F,2B,CD,74,01,23,CD,77,01,2B,10, 
F5,3E,20,CD,77,01,Cl,10,E4,El, C3, EF, CD, 3A, 
D5,DD,32,D9,DD,C3,2C,CE,3A,D5,DD,1D06 
570 DATA 32,DA, DD,C3,35, CE,CD,C0,D4,CD, CB, 
Dl,EB,D5,2A,DD,DD, 11,40,00,3A, D9, DD, FE, 00, 
28,04,47,19,10,FD, E5,47,3A,D5,DD,4F,3A,DA, 

DD, 90,3C,81,FE,51,30,03,91,18,03,3E,50,91, 
21,00,00, 11,40, 00, 47, 19,10, FD, E5, 1DAB 

580 DATA Cl, El, Dl, E7,38,06, CD, Cl, D2, C3, EF, 
CD,09,EB,09,EB,1B,2B,CD,Dl,D2,C3,EF,CD,CD, 

CO, D4,2A, DD, DD,11,40,00,3A,D9,DD,FE,00,28, 
04,47,19,10,FD,EB,D5,3A,DA,DD,3C,2A,DD,DD, 
11,40,00,47,19,10,FD,4F,3E,50,91,21AE 

590 DATA 28,10,£5,21,00,00,47,19,10,FD,E5, 
Cl,El,Dl,CD,Cl,D2,D5,3A,D9,DD,4F,3A,DA,DD, 
91,3C,21,00,00,11,40,00,47,19,10,FD,E5,C1, 
El,3E,20,CD,6B,01,C3,EF,CD,3A,D9,DD,47,3A, 
DA, DD, B8, D0,32, D9, DD, 78, 32, DA, DD,20AA 
600 DATA CD,2C,CE,C3,35,CE,2A,DD,DD,01,00, 
14,3E,20,CD,D0,D9,C3,EF,CD,2A,DD,DD,11,00, 
E0,01,00,14,C3,Cl,D2,2A,DD,DD,11,00,E0, EB, 
01,00,14, CD, Cl, D2, C3, EF, CD, 3A, F8, F7,32, CC, 
DD,01,CD,DD,02,21,86,1B,IE,64,CD,208F 
610 DATA 43, D5, IE, 0A, CD, 43, D5, IE, 01, CD, 43, 
D5,3A, CB, DD, 4F, C5, CB, 39,CB,39,CB,39,21,19, 
18,3A,F8,F7,41,C5,41,CD,4D,00,3C,11,20,00, 
19,10,F6,2E,IA,Cl,10,EF,Cl,C3,48, D7,16,01, 
0A, 93,38,04,02,14, 18, F8, 7A, CB, 27,19C0 
620 DATA CB,27,CD,4D,00,23,23,23,23,C9,3A, 
CB, DD, 4F, 3A,F8, F7, FE,00,CA,EC,D6,FE,01,CA, 
8E,D5,FE,02,CA,BB,D5,FE,03,CA,E0,D5, FE, 04, 
CA, 03, D6, FE, 05, CA, 2C, D6, FE, 06, CA, 55, D6, FE, 
07,CA,7B,D6,FE,08,CA,Al,D6,21,El,2521 
630 DATA 17,11,20,00,41,19,10,FD,11,00,DC, 
41, C5, 41, CD, 4A, 00, 12, 13, D5,11, E0, FF, 19, Dl, 
10,F3,D5,11,20,00,41,19,10,FD,23,Dl,Cl,10, 
E4,C3,CE,D6,21,00, 18,41,23,10,FD,11,00,DC, 
41,C5,41,CD,4A,00,12,13,2B,10,F8,179B 
640 DATA D5,41,23,10,FD,11,20,00,19,Dl,Cl, 
10, E9, C3, CE, D6, 21,01,18,11,00, DC, 41, C5,41, 
CD,4A,00,3E,F0,12,13,23,10,F6,D5,41,2B,10, 
FD, 11,20,00,19, Dl, Cl, 10, E7, C3, CE, D6,21,21, 
18,11,00,DC,41,05,C5,41,CD,4A,00,18B5 
650 DATA 12,13,23,10,F8,D5,41,2B,10,FD,11, 
20,00,19,Dl,Cl,10,E9,3E,F0,41,12,13,10,FC, 
C3, CE, D6,21,01,18, 11,00, DC, 3E, F0, 41,12,13, 
10,FC,41,05,C5,41,CD,4A,00,12,13,23,10,F8, 
D5,41,2B,10,FD,11,20,00,19,Dl,Cl,171E 
660 DATA 10, E9, C3, CE, D6,21,02, 18, 11,00, DC, 
41,C5,41,05,CD,4A,00,12,13,23,10,F8,3E,F0, 
12,13,D5,41,2B,10,FD,11,21,00,19,Dl,Cl,10, 
E4, C3, GE, D6, 21,01,18,11,00, DC, 41, C5,3E, F0, 
12,13,41,05,CD,4A,00,12,13,23,10,1649 
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67® DATA F8,D5,41,2B,10,FD,11,21,00 19 Dl 
Cl, 10 , E4, C3, CE,D 6 ,21, 00,00 ii 0 g 00 ’ 34 ' rr’ 
DD, FE, m, 28, 04,47,19 10 FD l! 00 38 4 Ï’ ra' 
FE,10,20,02,CB,20,E5;62,6B;CD,4A:00 El’cD 
4D,00,13,23,10,F2,C3,72,D7,21 01 1879 * * 

13 0 23 A 10 Ffi' m , ??’?S ,41,C5 ’ 41 ' 1 A - CD .4D,00, 
^?’T^’i^ ,F8,D5,41 ' 2B >10.FD,11,20,00,19 Dl 

?ft’ 11’ av' ?q’ SS’ S 0, ^ 08, 00, 3A, CC, DD, FE, 00 ,’ 

06’0?’S’ifi’ 1 1 ^’S , ^’ 01,18 ’ 79 ' FE - 08 - 2 8.14, 
06,02,Cö,06, 10, C5, CD, 24,07,23, Cl, 14CE 

w ’ 1 !’r, 1 ' 09 * 18 > C1 - 10 - EF - C9, 06,08, 
6 ?’«r’ rn'?I’SS’ 101F8 > C9 > 06. 08, 0E, 00, E5, 
82,8B '??’ 4A ’ 00, FE ’ E0 > 28, 04,79, F 6 ,01,4F, CB 

il’ H' SS’ EE ’ ^ E ' ^ 9 ’ E l> 7D. CD, 4D, 00, 06, 18, 13,’ 
7 ^ F niT?’^’ 00 ’ 28, 11 > 08, 00,3A, CC, 1885 
700 DATA DD,FE,00,28,04,47,19, 10,FD, 11 00 
38,41,78, FE, 10, 20, 02, CB, 20, CD, 4A, 00 Eö' 62* 

6 B, CD, 4D, 00, El, 13, 23, 10 , F 2 , 21 , 00,’00 U 08 
00,3A,CC,DD,FE,00,28,04,47, 19 10 FD ll’ 0 l’ 
18,79,FE,08,28,14;06,’02;C5,’0é,’l0;U09 ’ ’ 

710 DATA C5,CD,AA,D7,23,Cl,10,F8,11,09 18 

rl’ SS’ EF ’ C9 > 06 > 0 8.C5,CD,AA,D7,23,Cl,10 F 8 
C9, 06, 08,0E,80, E5,CD,4A,00,62,6B,Al,B9 28* 

?«■ S?' ïf - ??• 3E ' fi • °i>. “i>.ia. es: ?S: I!; 

’ SS’ 13 ’ 1®. FD, C9, 21 , 00 , 00 , 1B23 
? 20 11. 08 , 00,3A, F 8 , F7, FE, 00,28, 04, 47 , 

19,10,FD,3A,CB,DD,4F,FE,08,28,3C, 11 00 DC 

06,08,0E,80,C5,06,08 C5 CD 4A 00 Al B928 
« 4 ,3B,re, 18 ,« 2 , 3 e!F l;D 5 ! 12 , Ï5|ïi!’ 0 ?'f|' 
10,FD,12,13,12,Dl,13,13,Cl,CB,39 15DD ’ 

780 data i 0 , de, 06 ; i 0 ; i3;i0 ;fS; 23 ;èf:?®,D 0 , 

8A ' Sa’ 5?’ 4F ’ <28,8E ’ D 6 , E5,21, 00 , 00 , 3 A, CC, DD 
EE >!!’cf’ 04 ’ 47 ’l 9 ’l 0, ED ’ E5 > Dl, El, 06, 08, CD’ 
4 A ’SS’? B ’ CD ’ 4D ’ 00,EB ’13,23,10, F4, C3, 72, D 7 ’ 
3A,F8,F7,FE,04,CA,C2,D8,FE,01, CA, 1F4A 
740 DATA 68 , D 8 , FE, 02, CA, 6 F, D 8 , FE, 03 CA 73 
D8,3E,F5,21,00,18,01,00,03,CD,56 00 C9’cd’ 

A8,00,32,F8,F7,C9,CD,56 01 C9 21 00,28 U’ 

00,00,01,80,07,CD,4A,00,EB,Cd|4D 00 EB 13 

23,0B,78,BI,20,Fl,C9,21,00,00,11 196E ’ 

750 DATA 08,00,3A,F8,F7,FE,00 28 04 47 19 

4 ?’ Oö’ So’ 80 ’ 08 > C5 > E5 > 1F, ®®, 06, 08, CD,’ 4A,’ 00 * 

Al,28,02,3E,01,B3,5F,CB,0B,23 i 1 ©!Fl 00 00 

!?> SS’ r!’ E l. Cl, CB, 09,10, DF, C9, 21,00, 00 ,’ 

Si^SiSI’ S D ’ 4A ’ 00 ’ EE ’ FF ’ CD, 4D, 00 , 1736 
760 DATA 23, 0B,78,BI,20,F2,C9 3A F 8 F 7 FF 

FE’03’rA’?fi’nQ’?i’S A ’ 1E ' D9» Fe! 0 2^ Ca’ 3a| D9,’ 

FE, 03, CA, 56,D9, FE, 04, CA, 72, D9, FE, 05, CA 7 A 

S’^’S-^’ 82 ’ D 9 ’ fb ’ 07 ’ ca ’ 8 a ’ d 9 , 0 i!cb;d5; 

Sèl 3 ?’ FE ’ 09, 20 » ®2,3E,01,02, 21, A8,214C 
770 DATA B8,11,88,00,01,58,00,09 3D.20 FC 
C3, 5C, 0 0, 01, C F , DD, 0A., 3C, FE, 09, 20, 02 , 3E,’ 01 ’ 

S?’ ei ’ C0* B a , 11,08, 0 1, 0 1 > 00.01,09, 3D, 20 FC* 

C3,5C,00,01,D0,DD, 0A, 3C,FE,0B, 20, 02,3e’01’ 

02,21,F0,C2,11,08,02,01,D0,00,09 11 E 8 

780 DATA 3D,20,FC,C3,5C,00,01,Dl,DD,0A 3C 

fe,0 b , 2 0 ( 0 2)3 e,0 i , 02 ; 21 ; F0 ;c2;u; 08 ei 

D0, 00 , 09, 3D, 20, FC, C3, 5C, 00 , 21, 88 , 00, 11 ,’ 5s’ 

0 ?’ ria ’ 08 ’ ^1 ’ 08 > 0 1 > 11 , 00 , 01 . 18, 06, 21,08,02 * 

11,D0,00,18,06,21,08,03,11,D0,00, EDB ’ 

790 „DATA CD,4A,00,47,CB,2F,B0,CD,4D,00 23 
1 E ’ qo’ 20 ’ F0, CD, 2A, F 8 , F7, 06,40, C5, CD,’74,’ 

01,32, F 8 , F7, E5, CD, 8 C, D 8 , El, 23, Cl, 10 F 0 C9 

28,02,3E,01, B3, 5F,CB,0B,23,10,Fl,00 00*7 b’ 

S^?m1’ ci ’ cb ’ 09 ’ i 0 ’ df ;c9;c5;ïeée ’ * 

PQ 0 aa A Ia Sa’SS’ CD. 77 > 0i,23,0B,78,BI,20,F5, 

SS’SS’SS’ 00100 > 00 > 00 - 00 > 00 > ® 0 , 00 , 00 00 
SS’ SS’ SS’ SS’ 00 > 00 . 0 ®, 00 , 00 , 00 , 00 , 00 , 00 , 00 , 

SS’ SS’SS’SS’ 00 > ®®,®®, 00 , 00 , 00 , 00 , 00 , 00 , 00 , 

00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 1 00 1 0408 
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40 ’ j Door: Ad Schouwenaars 
50 ’ (----- 

60 |j (01988 MSX-Gids Lelystad 
80 ’ 

90 CLEAR 800:COLOR 15,4,7:SCREEN7:OPEF’GRP 
:”AS#1:CLS:QQ=RND(-TIME) 

100 DEFUSR0=342:DEFUSR1=65:DEFUSR2=68: DEFI 
NT V: DIM T(16,16) 

110 RESTORE 160:FOR AD=0 TO 7: READ D-VPOKE 
BASE(39)+AD, D: NEXT 

120 L1$="T150V14O4F+4A8G+8A8B8A4G+8F+4C+8F 

+4A8” 

130 L2$="G+8A8B8A4G+8F+4.A4B805C+404B8A4B8 
140 L3$=”05C+4.04F+8G+8A8G+4F+8G+8A8B8A4F+ 

8A4B8” 

150 L4$="05C+404B8A4B805C+4.04F+8G+8A8G+8A 
8B8A4G+8F+4” 

160 DATA 255,129,129,129,129,129,129,255 
170 Z$="V14L802GECQ1CC” 

180 VZ$=”VLIEGDEKSCHIP GEZONKEN”:VL$="SLAG 
SCHIP GEZONKEN 

cE^I? $= ” T0RPED0JAGER GEZONKEN ” : MJ$=”MI JN 
ENVEGER GEZONKEN ” 

200 ML$=”MIJNENLEGGER GEZONKEN ” 

210 GOSUB 2590 

^SET^AGE A 1 E 0 0 ’ 1 CLS: C0L0R 1 > 4 ,7: GOSUB 540 

230 COPY (0,0)-(512,212),1 TO (0,0),0:SET 
PAGE 0,0:COLOR 4,15 
240 IF EK=0 THEN EK=1:GOSUB 630 
250 GOSUB 1110 
260 PLAY ”V14L6403B04B05” 

270 ' 

280 ’ 

290 ’ 


i-—i 

I tabel bewerken I 

1 ----4 


300 FOR TY-0 TO 16:FOR TX=0 TO 16:T(TX TY) 
=0:NEXT:NEXT ’ 

310 TS=35:GOSUB 1220: 'Schepen verbersren 
320 FOR YN=0 TO 16:FOR XN=0 TO 16:IF T(XN 
YN)=0 THEN T(XN,YN)=15 ’ 

330 NEXT:NEXT 

340 PSET(320,100): PRINT#1,SPC(22) 

350 PSET(330, 100), 5: PRINT#1,"HOOGSTE SCORE 
: ” : PSET(450,100),5:PRINT#1,USING”###”:HS 
360 L5=5:L4=8:L3=9:L2=8:Ll=5:SC=50:SX=17:S 
Y=47 

370 PLAY "V1402L64E. . ” 

380 ' f -, 

390 ’ I hokje kiezen | 

400 * 1 - 1 

410 ON STRIG GOSUB 1870: STRIG(0) ON 

420 PUT SPRITE 0,(SX,SY),15,0:FOR V=0 TO 2 

5:NEXT ^ 

430 R=STICK(0) 

440 IF R=1 THEN SY=SY-10:GOTO 490 
450 IF R=3 THEN SX=SX+8:G0T0 480 
460 IF R=5 THEN SY=SY+10:GOTO 490 
470 IF R=7 THEN SX=SX-8 

480 IF SX<17 THEN SX=17 ELSE IF SX>129 THE 
N SX=129 

490 IF SY<47 THEN SY=47 ELSE IF SY>187 THE 
N SY-187 
500 GOTO 420 

510 * ,---, 

520 ' | tekenen speelveld I 

530 ’ 1 ---1 

540 N=65: LINE(33, 47)-(273,196), 5, BF: LINE(3 

10,0)-(315,212),5,BF 

550 LI NE (0, 27)- (310,29), 5, BF: PA INT (316, 1), 

15,5 ’ 



560 FOR X= 33 TO 275 STEP 16:LIRE(X,47)-(X 
,196):NEXT 

570 Y=47:FOR AL=1 TO 16:LINE(33,Y)-(273,Y) 

:Y=Y+10:NEXT ' 

580 COLOR 15,4:PSET(100,11);PRINT#1,"Z E E 
SLAG” .o 

590 FOR X= 38 TO 270 STEP 16:PSET(X,37):PR 
INT#1,CHR$(N): N=Ntl: NEXT 
600 N=65:Y=47:FOR AN=1 TO 15: PSET(20,Y+2)• 
PRINT#1,CHR$(N):Y=Y+10:N=N+1:NEXT 
610 RETURN 
620 ' 

630 COLOR 1:PSET(360,5):PRINT#1,”Z E E S L 
A G” 

640 PSET(320,20):PRINT#1,"Er worden 15 sch 
epen** 

650 PSET(320, 30):PRIFT#1,"willekeurig verb 
orgen in” ° 

660 PSET(320,40):PRINT#1,"het speelveld. A 
an u de” 

670 PSET(320,50):PRINT#1,"taak om ze op te 
sporen" r 

680 PSET(320,60):PRINT#1,"en te vernietige 

690 PSET(320,80):PRINT#1,"Er worden verbor 
gen, in" 

700 PSET (320, 90): PRINT#1, "zowel de lensste- 
als in" ° 

710 PSET(320,100):PRINT#1,"de breedtericht 
ing;” 

720 PSET(320,115):PRINT#1,”1 schip van 5 v 
akjes” 

730 PSET(320,125):PRINT#1,"2 schepen van 4 
vakj es” 

740 PSET(320,135): PRINT#1,"3 schepen van 3 
vakj es 1 * r 

750 PSET(320,145):PRINT#1,”4 schepen van 2 

vakj es" 

760 PSET(320, 155): PRINT#1, ”5 schepen van 1 
vakj e." r 

770 PSET(350,175):PRINT#1,"[ toets]” 

780 IF INKEY$=”" THEN 780 
790 LINE(316,18)-(512,170),15,BF 
800 PSET(320,20):PRINT#1,"Uw startscore is 
50* ” 

^320,30): PRIHT#1, H Bij een geraakt 

SOJjLO x 

(320, 40): PRIFT#1, n 5 punten erbij. 

830 PSET (320,50): PR IHT#1, M een misser eraan 
er 2 fl ° 

840 PSET(320,60):PRINT#1, n punten af, Is ee 
n schip” 

850 PSET(320,70):PRINT#1,"gezonken dan lev 
ert” 
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860 PSET(320,80):PRINT#1, H dit 10 extra pun 
ten op. M 

870 PSET(320,90);PRIFT#1,"Zijn alle schepe 
n van” 

880 PSET(320,100):PRIFT#1,”één kleur geraa 
kt dan” 

890 PSET(320,110):PRINT#1,"nog 10 extra pu 
nten." 

900 COLOR 8 

910 PSET(320,130):PRINT#1,"Let op: kiest u 
een al" 

920 PSET(320,140):PRINT#1,”voorheen gekoze 
n veld,” 

930 PSET(320,150): PRINTfl ,"dan gaan er 4 p 
unten af.":COLOR 1 

940 PSET(350,175):PRINT#!,"[toets]" 

950 IF INKEY$="” THEN 950 

960 LINE(316,18)-(512,170),15,BF 

970 PSET(320,50):PRINT#1,"Met de cursortoe 

tsen" 

980 PSET(320,60):PRINT#1," A " 

990 PSET(320,70): PRINT#1, " { >" 

1000 PSET(320,80): PRINTfl, " ▼" 

1010 PSET (320,90): PRINT#1, " laat u het raam 
pj e" 

1020 PSET(320,100):PRINT#1,"over de vakjes 
gaan, en" 

1030 PSET(320,110):PRINT#1,"u kunt vuren d 
oor de” 

1040 PSET(320,120):PRINT#1,"spatiebalk in 
te drukken” 

1050 PSET(350,175):PRINT#1,"[toets]" 

1060 IF INKEY$=”” THE® 1060 
1070 RETURN 

1080 ’ |-, 

1090 ’ j afbeeldingen | 

1100 * '-> 

1110 LINE(316,0)-(512,212), 5, BF: COLOR 1,5 
1120 PSET(360,10),7:PRINT#1,”1 x":FOR X=40 
0 TO 440 STEP10:CIRCLECX,14), 4,9: PAINT(X, 1 
4), 9: NEXT 

1130 PSET(360,20),7:PRINT#1,"2 x":FOR X=40 
0 TO 430 STEP10: CIRCLE(X,24),4,4:PAINT(X,2 
4), 4:NEXT 

1140 PSET(360,30), 7: PRINTfl,"3 x":FOR X=40 
0 TO 420 STEP10:CIRCLE(X,34),4,6:PAINT(X,3 
4),6:NEXT 

1150 PSET(360,40), 7: PRINT#1, "4 x":FOR X=40 
0 TO 410 STEP10:CIRCLECX,44),4,2: PAINT(X,4 
4),2:NEXT 

1160 PSET(360,50),7:PRINT#1,"5 x”:X=400:CI 
RCLECX,54),4,1:PAINT(X,54),1 

1170 PSET(320,100):PRINT#1,”_EVEN GEDUL 

D.” 

1180 LINE(310,64)-(512,66),4,BF:RETURN 

1190 ’ ,-1 

1200 1 I schepen verbergen j 

1210 ’ 1 - 1 

1220 PSET(320, 100): PRINT#1,"SCHEPEN PLAATS 
EN_" 

1230 MX=10:MY=10:GOSUB 1400:BS=5:KL=9:IF R 

=1 THEN GOSUB 1570 ELSE GOSUB 1720 

1240 PLAY"V12L64A” : FOR AS=1 TO 2 

1250 MX=11:MY=11:GOSUB 1400:BS=4:KL=4:IF R 

=1 THEN GOSUB 1570 ELSE GOSUB 1720 

1260 NEXT 

1270 PLAY"V12L64AR16L64A”:FOR AS=1 TO 3 
1280 MX=12:MY=12:GOSUB 1400:BS=3:KL=6:IF R 
=1 THEN GOSUB 1570 ELSE GOSUB 1720 
1290 NEXT 

1300 PLAY”V12L64AR16L64AR16L64A”:F0R AS=1 
TO 4 

1310 MX=13:NY=13:GOSUB 1400:BS=2:KL=2:IF R 
=1 THEN GOSUB 1570 ELSE GOSUB 1720 
1320 NEXT 


1330 PLAY"V12L64AR16L64AR16L64AR16L54A”:FO 
R AS=1 TO 5 

1340 MX=14:MY=14: GOSUB 1400:BS=1:KL=1:IF R 
=1 THEN GOSUB 1570 ELSE GOSUB 1720 
1350 NEXT 

1360 PLAY"V12L64AR16L64AR16L64AR16L54AR16L 
64A” 

1370 PSET(320,100):PRINT#1,". . .SUCCES. . . 

tl 

1380 RETURN 
1390 ' 

1400 HX=INT(RND(1)*14+1):HY=INT(RND(1)X14+ 
1):R=INT(RND(1)*2+1) 

1410 TX=HX:TY=HY 

1420 IF R=1 AND HX>MX THEN 1400 

1430 IF R=2 AND HY>ÏIY THEN 1400 

1440 IF R=2 THEN 1490 

1450 FOR CB=0 TO BS 

1460 IF T(TX+CB,TY)>0 THEN F=1:CB=BS 

1470 NEXT 

1480 IF F=1 THEN F=0:GOTO 1400 ELSE 1530 
1490 FOR CB=0 TO BS 
1500 IF T(TX,TY+CB)>0 THEN F=1:CB=BS 
1510 NEXT 

1520 IF F=1 THEN F=0:GOTO 1400 
1530 RETURN 

1540 ’ ,-1 

1550 ’ I horizontaal j 

1560 ' 1 -* 

1570 IF T(TX-1,TY-1)=0 THEN T(TX-1,TY-1)=1 

5 

1580 IF T(TX-1, TY)=0 THEN T(TX-1,TY)=15 
1590 IF T(TX-1,TY+1)=0 THEN T(TX-1,TY+1)=1 
5 

1600 FOR AB=1 TO BS:T(TX,TY)=KL 

1610 IF T(TX,TY-1)=0 THEN T(TX,TY-1)=15 

1620 IF T(TX,TY+1)=0 THEN T(TX,TY+1)=15 

1630 TX~TX+1: NEXT 

1640 IF TX>16 THEN 1680 

1650 IF T(TX,TY-1)=0 THEN T(TX,TY-1)=15 

1660 IF T(TX, TY)=0 THEN T(TX,TY)=15 

1670 IF T(TX,TY+1)=0 THEN T(TX,TY+1)=15 

1680 RETURN 

1690 ’ ,-, 

1700 ’ I verticaal | 

1710 • 1 - 1 

1720 IF T(TX-1,TY-1)=0 THEN T(TX-1,TY-1)=1 
5 

1730 IF T(TX,TY-1)=0 THEN T(TX,TY-1)=15 
1740 IF T(TX+1,TY-1)=0 THEN T(TX+1,TY-1)=1 
5 

1750 FOR AB=1 TO BS:T(TX,TY)=KL 

1760 IF T(TX-1, TY)=0 THEN T(TX-1,TY)=15 

1770 IF T(TX+1, TY)=0 THEN T(TX+1,TY)=15 

1780 TY=TY+1:NEXT 

1790 IF TY>16 THEN 1830 

1800 IF T(TX-1, TY)=0 THEN T(TX-1,TY)=15 

1810 IF T(TX, TY)=0 THEN T(TX,TY)=15 

1820 IF T(TX+1, TY)=0 THEN KTX+l, TY)=15 

1830 RETURN 

1840 ’ ,-1 

1850 ' | GEVUURD | 

1860 ’ 1 - 1 

1870 STRIG(0) OFF:PSET(320,70),7:PRINT#1,S 
PC(22) 

1880 VX=(INT(SXX2+7>/16)-1:VY=(SY/10)-3 
1890 IF T(VX, VY)=0 THEN PLAY”V14L6405C03C0 
IC”:SC=SC-4:GOTO 2000 

1900 IF T(VX,VY)=15 THEN PLAY"V14S12M55L16 
02C”:GOTO 1920 

1910 PLAY”V14S14M10L8O6C”:GOTO 1930 

1920 SC=SC-2:PSET(320,70),7:PRINT#1,SPC(22 

) 

1930 KL=T(VX,VY):CIRCLE((SX*2)+7,(SY)+5),4 

,KL:PAINT((SX*2)+7, (SY)+5),KL 

1940 IF KLC15 AND KL>0 THEN SC=SC+5 
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1950 IF KL=9 THE» GOSUB 2050 
1960 IF KL=4 THE» GOSUB 2090 
1970 IF KL=6 THE» GOSUB 2150 
1980 IF KL=2 THE» GOSUB 2210 
1990 IF KL=1 THE» GOSUB 2270 
2000 IF SC<0 THE» SC=0 :GOTO 2420 
2010 PSET (400, 200), 7: PRINT#1, USING”###”: SC 
: T(VX, VY)=0: RETURN 410 
2020 1 
2030 * 

2040 ' 


I n 

| SCORE bijwerken j 


2050 L5=L5-1:IF L5=0 THE» SC=SC+10:PSET(32 
0|70),7:PRI»T#1,VZ$:PLAY Z$:LI»E(350,14)-( 
450,14),15 

2060 IF L5=0 AND L4=0 AND L3=0 AND L2=0 A» 
D L1=0 THEN 2330 
2070 RETURN2000 
2080 ’ 

2090 L4=L4-1:IF L4=4 OR L4=0 THEN SC=SC+10 
: PSET (320, 70), 7: PR I »T#1, VLS: PLAY Z3> 

2100 IF L4=4 THE» PSET(352,20),7:PRINT#1,L 
4/4 

2110 IF L4=0 THE» SC=SC+10:LINE(350,24)-(4 
50,24),15 

2120 IF L5=0 AND L4=0 AND L3=0 AND L2=0 AN 
D L1=0 THE» 2330 
2130 RETURN2000 
2140 ’ 

2150 L3=L3-1:IF L3=6 OR L3=3 OR L3=0 THE» 
SC=SC+10:PSET(320,70),7:PRI»T#1, TZ$: PLAY Z 
$ 

2160 IF L3=6 OR L3=3 THE» PSET(352,30),7:P 
RINT#1,L3/3 

2170 IF L3=0 THE» SC=SC+10:LINE(350,34)-(4 
50,34),15 

2180 IF L5=0 AND L4=0 AND L3=0 AND L2=0 AN 
D L1=0 THEN 2330 
2190 RETURN2000 
2200 ’ 

2210 L2=L2-1:IF L2=6 OR L2=4 OR L2=2 OR L2 
=0 THE» SC=SC+10: PSET(320,70), 7: PRI»T#1 MJ 
S:PLAY ZS 

2220 IF L2=6 OR L2=4 OR L2=2 THE» PSET(352 
,40),7:PRI»T#1, L2/2 

2230 IF L2=0 THE» SC=SC+10:LINE(350,44)-(4 
50,44),15 

2240 IF L5=0 AND L4=0 AND L3=0 AND L2=0 AN 
D L1=0 THEN 2330 
2250 RETURN2000 
2260 ’ 

2270 L1=L1-1;SC=SC+10:PSET(320,70),7:PRINT 
#1, ML$:PLAY Z$ 

2280 PSET(352, 50),7:PRI»T#1,LI 

2290 IF L1=0 THE» SC=SC+10:LINE(350,54)-(4 

50,54),15 

2300 IF L5=0 AND L4=0 AND L3=0 AND L2=0 AN 
D L1=0 THEN 2330 
2310 RETURN2000 
2320 ’ 

2330 PSET(320,150):PRINT#1,"HET ESKADER IS 
DOOR” 

2340 PSET(320,160):PRINT#1,"U TOT ZINKEN G 
BBRACHT!" 

2350 PSET (320, 170): PRINT#1, ” — 

2360 COLOR 15: PSET (320,200): COLOR 4:PRINT# 
1,”UW SCORE:” 

2370 PSET(400,200):PRINT#1,USING”###" : SC:P 
LAY” V 14L3203CDE04 FGA05 BBB”: COLOR 1 
2380 GOTO 2490 

2390 ’ |-, 

2400 ’ I niet gehaald I 

2410 ' ■-i 

2420 PSET(320, 70): PRINT#1,”HELAAS. . 

2430 PSET(320,80):PRINT#1,"U heeft het nie 
t gehaald” 


2440 COLOR 9: PSET(320,90):PRINT#1."' 

' COLOR 1 

2450 PSET(400,200):COLOR 8:PRINT#1,USING ” 
###”;SC:PLAY”V14L3203FE02BGA02GEC” 

2460 ' ,- 

2470 ’ l einde spel I 

2480 1 1 -- 

2490 U=USR (0): IF SOHS THEN HS=SC 

2500 PSET(320,180), 7:PRINT#1,"Nog een spel 
? J/N ö y 

2510 K$=INKEY$ 

2520 IF K$=”J” OR K$=”j” THEN 230 

2530 IF K$=”N” OR K$=”n” THEN COLOR 15,4,4 

:KEYON: SCREEN0: END 

2540 GOTO 2510 

2550 ’- 

2560 * ,-1 

2570 ' | beginscherm | 

2580 ' •-• 

2590 U=USR1(0): PLAY L1$:PLAY L2$ 

2600 COLOR ,4,7:LINE(167,43)-(344,83),,BF 
2610 LINE(50,20)-(167,43):LINE(50,20)-(167 
,83):LINE(344,43)-(462,20):LINE(344,83)-(4 

62.20) :LINE(167,43)-(255,10):LINE-(344,43) 

:PAINT(166,44):PAINT(345,44):PAINT(255,20) 
2620 COLOR 1:LINE(50,20)-(255,63):LINE-(46 

2.20) .-LINE(250,63)-(255,10):LINE-(260,63): 
LINE(255,10)-(255,63) 

2630 COLOR l:FOR Y=55 TO 57 

2640 11=191:X2=215:X3=239:X4=263:X5=271:X6 

=307:X7=331 

2650 FOR AL=1 TO 3 

2660 PSET(XI,Y):DRAW”L16R16G16R16”:PSET(X2 
, Y): DRAVL16D16R16L16U8R8” 

2670 PSET(X3, Y): DRAW”L16D16R16L16U8R8”:PSE 
T(X4, Y):DRAV”L16D8R16D8L16” 

2680 PSET(X5,Y):DRAV”D16R16”:PSET(X6, Y):DR 
AV”L8G4D12U8R16D8U12H4” 

2690 PSET(X7,Y):DRA¥”F4H4L8G4D8F4R8E4U4L8” 
2700 X1=X1+1:X2=X2+1:X3=X3+1:X4=X4+1:X5=X5 
+1:X6=X6+1:X7=X7+1:NEXT:COLOR 13:NEXT 
2710 LI NE (151, 135)- (360, 152) , 5, BF: LINEU50 
, 134)-(361,153),7,B 
2720 PLAY L3$:PLAYL4$ 

2730 DATA A, d, , S, c, h, o, u, w, e, n, a, a, r, s, ,-, 

, A, p, e, 1, d, o, o, r, n 
2740 RESTORE 2730 

2750 COLOR 11,5:X=163:FOR AL=1 TO 27:READ 
L$:PSET(X, 140), 5: PRINT#1,L$:X=X+7:NEXT 
2760 LINE(50,20)-(167,43):LINE(50,20)-(167 
,83):LINE(344,43)-(462,20):LINE(344, 83)-(4 

62,20):LINE(167,43)-(255,10):LINE-(344,43) 
2770 LINE(0, 167)-(64, 135), 13: LINE-(78, 143) 

, 13: LINE-(0, 191), 13: PAINT (1,169), 5,13 
2780 CIRCLE(15, 211), 34, 15, , , 1. 6: PAINTQ5,2 
11),14,15 

2790 CIRCLE(15,211),14,1,,,1.6:PAINT(15,21 
1), 1 

2800 CIRCLE(15, 211),34,1,,,1.6:CIRCLE(16,2 
11),34,1,,,1.6 

2810 LINE(512,161)-(500,161),5:LINE-(500,1 
51), 5:LINE-(414, 151),5:LINE-(464,212),5:PA 
INT(511,211),5 

2820 CIRCLE(459,170),9,1:PAINT(459,170),1 
2830 CIRCLE(389,212),14,15,,,1.7:PAINT(389 
,211),15:CIRCLE(389,200),11,6,,,.3:PAINT(3 
89,200),6 

2840 X=394:FOR Y=205 TO 171 STEP-2:CIRCLE( 

X, Y), 2,1: PAINT (X, Y), 1: X=X+4: NEXT 

2850 LINE(381,205)-(394,207),1,BF 

2860 X=382:FOR Y=205 TO 212 STEP 2:CIRCLE( 

X, Y), 2,1: PAINT(X, Y), 1: X=X-4: NEXT 
2870 ' 

2880 U=USR2(0) 
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2890 IF PLAY(0)=-l THEN 2890 
2900 FOR AS=1 TO 5:F0R AF=15 TO 4 STEP-1 
2910 SOUND0, 0: SOUND1,5:SOUND2,0:SOUND3,13: 
SOUND4,255:SOUND5, 15 

2920 SOUND6, 30: SOUND7, 0: S0UITD8, AF j S0UND9, A 
F:SOUND10,AF:SOUND11,0 
2930 S0UND12, 5: S0UND13, 0 
2940 LINE<73,138)-(116,113), AF: LINE<75, 140 
>-<117,114),AF:LINE(71,136)-<115,110),AF:N 
EXT:SOUND8,0:S0UND9,0:SOUND10 0:FOR V=0 TO 
150:NEXT 

2950 CIRCLE(180+K,80-L),9,1,,,.2:PAINT<180 

+K,80-L),1:K=K+33: L=L+7 

2960 FOR GG=16 TO 0 STEP-1 

2970 SOUND0,0: SOUND1,5:SOUND2, 0: SOUND3 13: 

S0UND4,255:S0UND5, 15 

2980 S0UND6,30: S0UND7,0:S0UND8,GG:S0UND9,G 

G:SOUND10,GG:SOUND11,0 

2990 S0UND12,5:S0UND13,0:NEXT 

3000 FOR V=0 TO 150:NEXT:SOUND8,0:S0UND9,0 

: SOUND10, 0: NEXT 

3010 SOUND7,&B11111000:'FOR W=0 TO 100:NEX 
T 


3020 FOR AK=1 TO 5:FOR RK=15 TO 5 STEP-1:C 
OLOR 11,4,RK:NEXT:NEXT:RETURN 
3030 ’ 


3040 

* SftSftftSftfifif einde listing 

wfimfinW 




CONTROLETEL.LINQ 

Regel 

: 730 - 45 

Regel 

1 460 


238 

Regel: 

10 

- 58 

Regel 

: 740 - 56 

Regel 

1 470 

_ 

1 31 

Rege1: 

20 

- 58 

Regel 

: 750 “ 65 

Regel 

1 480 

_ 

232 

Regel: 

30 

- sa 

Regel 

760 - 6 

Regel 

1 490 

_ 

213 

Regel: 

40 

- 58 

Regel 

: 770 - 207 

Rege 

1 500 

_ 

238 

Regel: 

50 

- 58 

Regel 

: 780 - 1 

Regel 

1510 

_ 

1 31 

Regel: 

60 

£8 

Regel 

: 790 - 234 

Rege 

1620 

- 

1 92 

Regel: 

70 

- 58 

Regel 

! 800 - 20 

Regel 

1 530 

- 

142 

Regel: 

30 

- 58 

Regel 

; 810 - 230 

Regel 

1540 

_ 

58 

Regel: 

30 

- 21 

Rege1: 

820 - 193 

Regel 

1 550 

- 

58 

Regel: 

1 00 

- 52 

Regel 

630 - 56 

Regel 

1560 

_ 

58 

Regel: 

1 1 0 

- 36 

Rege1: 

840 - 113 

Regel 

1570 

- 

54 

Regel: 

120 

- 63 

Regel; 

850 - 199 

Rege 1 

1 580 

- 

46 

Regel: 

1 30 

- 101 

Regel: 

860 - 88 

Regel 

1 590 

_ 

52 

Regel: 

1 40 

-114 

Regel: 

870 - 57 

Rege 1 

1 £00 

- 

1 90 

Regel: 

1 50 

- 237 

Regel: 

880 - 178 

Regel 

1610 


46 

Regel: 

160 

- 184 

Regel: 

890 - 122 

Regel 

1 620 

- 

44 

Regel: 

1 70 

- 70 

Regel: 

900 - 246 

Rege 1 

1630 

_ 

7 

Rage 1: 

160 

“ 28 

Regel: 

910 - 21 

Rege 1 

1640 

_ 

34 

Regel: 

1 90 

- 79 

Regel: 

920 - 23 

Regel 

1650 

- 

46 

RegelJ 

206 

6 

Regel: 

930 - 222 

Regel 

1660 

- 

38 

Regel: 

210 

- 227 

Rege1: 

940 - 207 

Regel 

1670 

- 

44 

Regel: 

220 

1 4 

Regel: 

950 - 171 

Rege 1 

1680 

- 

1 42 

Regel: 

230 

- 132 

Regel: 

960 - 234 

Regel 

1690 

_ 

58 

Regel: 

240 

“ 83 

Regel: 

970 - 28 

Rege 1 

1 700 

- 

58 

Regel: 

250 * 

- 21 

Regel: 

980 - 101 

Regel 

1710 

_ 

58 

Regel; 

260 

- 163 

Regel: 

990 - 96 

Regel 

1720 


54 

Regel: 

270 

- 58 

Regel: 

1000 - 120 

Regel 

1 730 

- 

46 

Regel: 

260 

- 58 

Regel: 

1010“ 13 

Regel 

1740 

- 

£2 

Regel: 

290 

- 58 

Rege1; 

1020 - 168 

Regel 

1750 

- 

1 30 

Regel: 

300 

- 37 

Regel; 

1030 - 237 

Rege 1 

1760 

- 

46 

Regel: 

310 

- 249 

Regel: 

1040 “ 183 

Regel 

1770 

- 

44 

Regel: 

320 

- 131 

Regel; 

1050 - 207 

Regel 

1 780 

_ 

9 

Regel: 

330 

- 64 

Regel: 

1060 - 26 

Regel 

1 790 

_ 

1 86 

Regel : 

340 - 

- 104 

Regel: 

1070 - 142 

Regel 

1 800 

_ 

46 

Regel ; 

350 - 

- 90 

Rege1: 

1080 “ 58 

Regel 

1810 

_ 

38 

Regel: 

360 - 

- 141 

Regel: 

1090 - 58 

Regel 

1820 

_ 

44 

Regel : 

370 - 

- 1 84 

Regel: 

1100“ 58 

Rege 1 

1830 

_ 

142 

Regel: 

360 - 58 

Rege1: 

1110 - 103 

Regel 

1 840 

_ 

58 

Regel: 

390 - 

58 

Rege1: 

1120 - 138 

Regel 

1 850 

_ 

58 

Regel: 

400 - 58 

Regel: 

1130 - 149 

Rege 1 

1 860 

_ 

58 

Regel: 

410 - 

• 122 

Rege1: 

1140 - 174 

Rege 1 

1870 

_ 

215 

Regel: 

420 - 

131 

Regeli 

1150 - 187 

Regel 

1880 

_ 

124 

Regel: 

430 - 

68 

Regel: 

1160 - 148 

Regel 

1890 

_ 

220 

Regel: 

440 - 70 

Regel: 

1170 - 32 

Regel 

1 900 

_ 

28 

Regel: 

450 - 

59 

Regel: 

1180 - 105 

Regel 

1910 

_ 

244 

Regel: 

460 - 

73 

Regel: 

1190 - 58 

Regel 

1920 


232 

Regel: 

470 - 

110 

Regel: 

1200 “ 58 

Regel 

1930 

- 

130 

Regel; 

460 - 

1 09 

Regel: 

1210 - 58 

Regel 

1940 

- 

88 

Regel: 

490 - 

33 

Regel; 

1226 - 181 

Regel 

1 950 

- 

42 

Rege1: 

500 - 

92 

R*gel: 

123ö - 126 

Rege 1 

1 960 

- 

77 

Regel: 

510 - 

58 

Regel; 

1240 - 82 

Regel 

1 970 

- 

1 39 

Regel: 

520 - 

58 

Regel: 

1250 - 122 

Regel 

1 980 

- 

1 95 

Regel: 

530 - 

58 

Regel: 

1260 - 131 

Regel 

1 990 

- 

254 

Regel: 

540 - 

49 

Regel: 

1270 - 3 

Rege 1 

2000 

- 

96 

Regel: 

560 - 

1 84 

Regel: 

1280 - 125 

Rege 1 

2010 

- 

1 42 

Regel: 

560 - 

16 

Regel: 

1290 - 131 

Regel 

2020 

- 

58 

Regel; 

870 - 

175 

Regel: 

1300 - 180 

Regel 

2030 

- 

58 

Regel: 

560 - 

125 

Regel: 

1310 - 122 

Regel 

2040 

- 

58 

Regel: 

530 - 

1 67 

Regel: 

1320 - 131 

Rege 1 

2050 

- 

85 

Regel; 

600 - 

1 73 

Regel: 

1330 - 100 

Regel 

2060 

- 

73 

Regel: 

610 - 

142 

Regel: 

1340 - 122 

Regel 

2070 

- 

1 15 

Regel: 

620 - 

58 

Regel: 

1350 - 131 

Rege 1 

2080 

- 

58 

Regel: 

630 - 

62 

Regel: 

1360 - 116 

Regel; 

2090 - 

76 

Rege1 ; 

646 - 

33 

Regel : 

1370 - 89 

Regel ; 

2100 - 

33 

Regel : 

660 - 

1 90 

Regel ; 

1380 “ 142 

Regel: 

2110 - 


49 

Regel: 

660 - 

68 

Regel: 

1390 - 58 

Regel: 

2120 - 


73 

Regel i 

670 - 

1 52 

Regel ; 

1400 - 64 

Regel : 

2130 - 

- 115 

Regel : 

680 - 

1 7 

Regel : 

1410 - 178 

Regel : 

2140 - 


68 

Regel : 

690 - 

222 

Regel: 

1420 - 12 

Regel: 

2150 - 


1 6 

Regel i 

700 - 

178 

Regel: 

1430 - 15 

Regel ; 

2160 - 

227 

Regel : 

710 - 

214 

Regel: 

1440 - 254 

Regel : 

2170 - 


68 

Regel ; 

720 - 

84 

Regel: 

1450 - 213 

Regel: 

2180 - 


73 


Regel 

2190 

- 

1 15 

Rege 1 

2200 

- 

58 

Regel 

2210 

- 

171 

Regel 

2220 

- 

161 

Regel 

2230 

- 

87 

Regel 

2240 

- 

73 

Regel 

2250 

- 

1 1 5 

Regel 

2266 

- 

58 

Regel 

2270 

- 

61 

Regel 

2280 

- 

234 

Regel 

2290 

“ 

1 06 

Regel 

2300 

- 

73 

Rege 1 

2310 

- 

1 IS 

Regel 

2320 

- 

58 

Regel 

2330 

- 

1 93 

Regel 

2340 

- 

151 

Regel 

2350 

- 

1 35 

Regel 

2360 

- 

1 98 

Rege 1 

2370 

- 

14 

Rege 1 

2380 

- 

122 

Regel 

2390 

- 

58 

Regel 

2400 

- 

56 

Regel 

2410 

- 

58 

Regel 

2420 

- 

153 

Regel 

2430 

- 

3 

Regel 

2440 

- 

23 

Regel 

2450 

- 

244 

Regel 

2460 

- 

58 

Regel 

2470 

- 

58 


Regel 

2480 

- 

58 

Regel 

2490 

- 

193 

Rege 1 

2506 

- 

226 

Regel 

2510 

- 

74 

Regel 

2520 

- 

232 

Regel 

2530 

- 

223 

Regel 

2540 

- 

1 42 

Regel 

2550 

- 

58 

Regel 

2560 

- 

58 

Regel 

2670 

- 

58 

Regel 

2580 

- 

58 

Regel 

2590 

- 

14 

Rege 1 

2600 

- 

222 

Rege 1 

2610 

- 

1 79 

Rege 1 

2620 

- 

92 

Regel 

2630 

- 

186 

Regel 

2640 

- 

1 1 5 

Regel 

2650 

- 

93 

Regel 

2660 

- 

169 

Regel 

2670 

- 

241 

Regel 

2680 

- 

253 

Regel 

2690 

- 

94 

Rege 1 

2700 

- 

79 

Regel 

2710 

- 

232 

Regel 

2720 

- 

35 

Regel 

2730 

- 

1 33 

Regel 

2740 

- 

1 10 

Regel 

2750 

- 

83 


Regel 

2760 

- 

127 

Regel 

2770 

- 

42 

Rege 1 

2780 

- 

225 

Regel 

2790 

- 

1 06 

Regel 

2800 

- 

21 1 

Regel 

2610 

- 

216 

Regel 

2820 

- 

179 

Regel 

2830 

- 

70 

Regel 

2840 

- 

1 06 

Regel 

2650 

- 

1 36 

Regel 

2860 

- 

176 

Regel 

2870 

- 

58 

Regel 

2680 

- 

1 £0 

Regel 

2890 

- 

62 

Regel 

2900 

- 

4 

Regel 

2910 

- 

183 

Regel 

2920 

- 

59 

Regel 

2930 

- 

120 

Rege 1 

2940 

- 

160 

Regel 

2950 

- 

84 

Regel 

2966 

- 

104 

Regel 

2970 

- 

183 

Regel 

2980 

- 

86 

Regel 

2990 

- 

53 

Regel 

3000 

- 

46 

Regel 

3010 

- 

1 05 

Regel 

3020 

- 

1 44 

Regel 

3030 

- 

58 

Regel 

Totaal 

3040 - 
: 32538 

58 


TIMEFIGHTER 

Indien er een diskdrive op uw computer is 
aangesloten, opstarten met <CTkL>. 


De listing bestaat uit een aantal DATA- regels 
gevolgd door een poke- en een verplaats- routine. 
Achter elke DATA- regel staat een checksum. Deze 
moet vooral goed worden overgetgpt! Dan,als de 
listing helemaal is ingetgpt, kan het BASIC- 
programma met RUN worden gestart. De DATA's zullen 
nu in het geheugen worden gePOKEd en tegelijk 
worden gecontroleerd. Als er geen fouten zijn 
ontdekt, verschijnt OK op het scherm. Nu moet 
nogmaals RUN worden ingevoerd. Het machinetaal 
programma zal dan worden verplaatst naar het 
juiste adres. Ik heb voor deze methode gekozen 
omdat het vanwege de lengte van de DATA's niet 
mogelijk was om het programma meteen op het juiste 
adres te POKEn. De machinetaal kan hierna worden 
gesaved. 


Spelbeschrijving: Als het intgpen van de listing goed 
is verlopen en het programma vast op tape of disk 
is gezet, kan het worden gestart door het te laden 
met BLOADTIMEFr.R of door het intgpen van 
U«USR(0). Dit laatste kan alleen als het BASIC 
programma pas is opgestart, zodat USRO is 
gedefinieerd. Het spel zal opstarten met een 
titelscherm en muziek. Door op CTRL/STOP te 
drukken of te wachten tot de muziek is afgelopen, 
verschijnt het volgende beeld. Het spel start nu 
door een druk op de vuurknop. Door te wachten zal 
een DEMO van veld 1 worden gegeven. Er kan ook een 
DEMO worden gegeven van de andere velden door op 
toets D te drukken, gevolgd door het veldnummer. 
Met <ESC> kunt U pauzeren en door tijdens het 
spelen op CTRL/STOP te drukken, komt U weer bij 
het beginbeeld. Veel plezier!!! 


S. Weigel 
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10 DATA 38,44,44,0,88,88,70,0,0.4,4.0 8 8 

»’ft , 4? , h 4 ^ 0 L Ö0,80,70 ’ 0,38,4,4 » 30 > 8 '®'70,’ 

0 ’1880’ 44 ' 30 ’ 6 ' 8 ’ 0 ’ 0 ’ 38 ’ 40 ’ 40, 30,8,8,70,0, 

t}}, ll: X: ü; II: 2:2: % j; 2; 4 4 I; 2:2 

30 DATA 0,0,0,0,0,3,F,0,7F,FF,3,0,1,3 5 5 
B ki B ^ 6 ^ 5 ; EB ’ D8 > 7 , FB, Fl, E 0 , Fl, IE, 80, cl,’ A 0 

;ft 1 #’4519°’ AE ’ D7 ’ 1B ’ E0 ’ DF ’ 8F ’ 8F ' 78 '®> 0 
40 ^l\ 0 ’ 0 i 0 * 0 ' 0 ' C 0 * F 0 .®.PE,FF,C0,0,0,0,0 
ft 0 ^ 0 A 0 A, 0 ^'^' 0 ’ 0,4,B ’ 1 F *B, 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 
ca 0 A?^ 0,20 ’ 70,F8 > 70, 0)60,60,F0,F0,#,2372 

50 BATA 60, 0 i ®. ®> 0 . 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0,0 

A 0,0,0,0 , 0 ,0,0' 0 > 0 >0> 0 >11|0,38,21,5C,C0,1, 

7 F ’’E C ’ 0 ’ 38,44,BA » 82 > BA > AA > BE,0,#,1935 

f C,82,DA,44,DA,82,FC,0,3C,42,BC A0 

r B AÓ 4 nr 3 «ó 0 ^ 8 A 84 ’ 7A ’ 4A ’ 7A ’ 84 > F8 > ®. FC, 82, B 
?ó 8 iA B AA 8 ni FC ’ 0 ’ FC ’ 82,BC ' 82 > Bc >A0,E0, 0 ,3C, 

42, BC, A2, BA, 42, 3C, 0, #, 6464 
70 BA I AEE - AA ’ BA ’ 82 > ba > AA. BE, 0 , FE, 82,6C, 28 
> 63 - 82 - FB - 0 . FE . 82 > 6C,28,68,90,60,0, E 6 , AA, B 
4, 88 , B4, AA, E 6 ,0, E0, A0, A 0 , A 0 , BC, 82, FC, 0 , 44, 
AA, 92,AA,BA,AA,EE,0,#,6936 

8 Ri D JJ A Ao 4 A A nA 9 f’ AA ’ B2,AA ’ B6)0 ’ 38 - 44,BA,AA 
i BA ' 44 ' 38 < 0 > Fc .32,BA,82,BC,A0,E0,0,7C,82,B 
A. BA A B4 ’ 8A '76,0,FC, 82, BA, 82,B4,AA, EE, 0, 7C, 
82,BC,82,7A, 82, 7C, 0, #, 6496 

9 RA D «ÏV E A 8 ii 6 ?’ 28 > 28 . 28 . 3S, 0, EE, AA, AA, AA 
' B J* 8 f A 7 ^ 0 i EE ’ AA ’ AA ’ AA ’ BA ’ 44,38, 0 , EE, AA, A 
A,M, AA ,92,6C, 0 ,EE, M.54,28,54, AA,EE,0,C6, 
AA,54,28,28,28,38,0, #,5754 
i 00 £ A J A FB. 82. F4,28,5E, 82, FE, 0,11, 8 , 2 , 21 , 

B 8 -£®.P D0 ’ 0 ’ C3 * 5C > 0 .!.3,F,1B, 17, 3E, 7F, 7B, 

C0,F0,B 8 ,DC,DC,FE,7F,FB, 6 F, 6 E, 37,1F,D,7 ,1 
0,E7,FE,F4,DC,#,5472 ’ ’ ’ ’ 

^; 10 DA J A 78, A0, C0, 0 , 1,3, F, 1B, 17, 3E, 7F, 7B, C 
0 * F 0 i B 8 l Dc . DC, FE,7F,FB, 6 F, 6 E,37,1F,D,7, 1,0 

; !!•??: 3: TA ™' C0 - 0 * 0 - 0 * 0 - 3 - f * 3f > 87 > cf 

120 DATA F0,FC, E6, F3,7E,9E,E3,7C,1F 23 IC 
7 > 7E > I 9 ’ C7,3B > F8i C4,38, E0, 0,0,0, 3, F, 3F,' 67,' 
9 F ’®> ®> ®> C0, F0, FC,E6, F3 , 7 E,9E,E3,7C,1F.23, 

IC, 7,7E,79,C7,3E,#,5725 

1 3 ?a D £[ A J £ 8,C4,38 ’ B0 ’ 40 ’ E2 ’ E7 . 42,0, 18,3C,1 
?r 4 ?ft E ?^ E ^ 4 ió 0 ii 8 ’ 3C ’ 18, 40, B2 > F7. 42, 0, 18, 
3 «A 1 f’^ ,E2 ’ B7 ’ 42 ’ 0, 18 > 3C . 18,3,2, E, 8,38, 20 
, 60, 0, C0, 40, 70, 10 , #, 4099 

140 DAJ A IC, 4,6,0,28,28,10,38,38,38, 10,0,0 

’ ™ F 5A A oi D5 ' FP ’ 0 > 0 . 6 . 7. F, IC, 38, F 0 , E0, 60,60 
, E 0 , F 0,38, IC, F, 7, 6 , F, 3E, 7F, F9, Fl, Fl, F3,7F, 

70,FC,7E,9F, #, 4510 ..... 

^ 0 JATA SF, 8 F, CF, FE, 3E, 5D, 67,6A, 34,19, F, 3 
,7C,BA,E6,96, 2C,58,F0,C0,0,0,3, F, 1B, 37, 7 F, 

F8,30, F0, E0, B0, 78,6C, F 6 , 1F, 7F, F3, F9, 7F, 38, 

I D, F,3,FE,CF,9F,FE,#, 5851 
J 6 ®DAJA 1 C , B8. F 0 ,C0, 1 1,0,6,21,C4,C1 ( 1,10, 

1,C3,5C,0,0,0,FF, FF,0, 0,FF, FF,0, 0,FF,FF,0, 
g» F 5*; F J* Sji FF ' FF - 0 - 0 ' FF * FF, 0, 0, FF, FF, 0,0, 

x'p , rr | ft f u 4 / 4 

170 DATA E5,D5,CD,4D,0,2B,3D,CD,4D,0,3D ,11 
,1F,0,A7,ED,52,CD,4D,0,3D,2B,CD, 4D, 0 ,Dl,El 

: 8:1!: Sfiü; Jfiesé 6 ' 4 ' B9> c> c ' c: w: F8 

2’i 9,3C ’ CD > 4D ' 0 .23,3C, CD,4D, 0, Cl,D 
1 ,El,C9,E, C2 t CD,21,#,4926 

^ 0 o£ A J A 1 9 3 , 20 , 5 ' 11 ' 20 » 0 > 18 ' D 6 * B > cl .CD, 21 , 

J 3 * 20 >5.:11,:1., 0, IS,CA,E,C0,CD,21,C3,20,DD,1 

1,0,0,18,BE,AB,2,2,40,0,3,30,30,30,30,30,3 

0,30,F,3,8,#,3167 



?ft 0 o , D tI A o 1 ^ , o 7,10 ’ 5 ’ 19 ’ C ' 7 ’ 12 > 1A . 1 C.A,4,6, 

JJ'®» 14 ’ 2 * F ' 8 ' 1. ®.98,C3,13,D0,E2,E5,D5,3E, 
20,11,1F,0,CD,4D,0,2B,CD,4D,0,A7,ED,52,CD, 
4D,0,2B,CD,#,3277 

210 £ A ï A 4D, 0, Dl, El, C9,21, BF, IA, 6, 20, 48, CD 

’ 4A ' 0 ' FE ’C3,2 8 , l 0 ,FE,C7,28,C,FE,CB,28,8,FE 
’ 4 ’ FB ’ DD ’ 38 > 3> CD, AA, C3,79, CD, 4D, 0, 2B 

, 10, DF, C9, E5, D5, C5, #, 6000 

220 BATA 11 * 1F »0,6,16,21,0,18,18,F,CD,4A,0 
Ao E ;£ 0 aS 8, fe * D7,D0,3E,20,CD,4D, 0, C9, CD, FA, 

9d’1E’9 D,FA ’ C3,23, 10 .F6,C1,D1,E1,C9,E5,C5, 
4F,3E,20,CD,4D, 0, 19, #, 5739 

i? 0 J? A ^ CD ’ 4A ’ 0 ’ FB ' 20 > 20 * 4* 79, CD, 4D, 0, Cl, 
E 1,C9,D5,11,IE,0,CD,17,C4,Dl,C9,D5,11,22,0 

} 7 i? 4 X D h C9 * 05 * 11 • 1F - 0 » CD, 17, C4, Dl, C9, 
D5,11,21,0,CD,17,C4,#,5597 
240 DATA D1.C9.D5,11,20,0,CD,17,C4,Dl,C9,E 
5, C5, 4F, CD, AA, C3, 79, 19, CD, 0, C3, Cl, El, C9, E5 
,D5,C5, 21 , BF ,IA,11,20,18,3A,80,C3,E6,1,28, 
33,CD,4A,0,FE,C3, 28,4,#,6183 
280 ?ATA FE,CB,20,A,D5,11,1F,0,CD,5B,C4,Dl 
’cn’i?’FE,C7,28,4,FE,CF,20,A,D5,11,21,0,CD 
’^?’9 4,D1 ’ 18 >C,FE, El,20,8,D5,11,20,0,CD, 5B 
,C4,Dl,CD,4A, 0,FE,#,5530 

260 DATA D0,20,5, CD, 2E,C4,18,28,FE,Dl,20,5 
, CD, 37, C4, 18, 1F, FE, D2,28, 4, FE, D4,20, 5, CD, 4 

0,C4,18,12,FE,D3,28,4,FE,D5,20,5,CD,49,C4, 

18, 5, FE, D6, CC, 52, C4, #, 5751 

2 7 0 DATA 2B,E7,30,8E,CD,C5,C3,CD,ED,C3,21, 

0 ’ ll’h’ïi’tk 79,CD ’ 56,0 ’ C1 > D1 - BI, C9, Dl, IA,A 
7, 2 0, 2 ,E b ,E 9,CD, 4 D, 0 , 23 ,13,18, F3, F5, 78,3C, 
E6,F8,26,0,6F, 29, 29, #, 5669 
280 DATA CB,39,CB,39,CB,39,6,0,9,1,0,18 9 
Fl,C9,E5,2A,A5,C3,4E,11,A3,C3,23,E7,20,3^2 
1,8D, C3,22, A5, C3, 6,0,21,40,18, 9,3A, 82, C3, F 
E,1,20,2,E,C3,#,4436 

290 DATA FE,2,20,2,E.CB,FE,3,20,4,3e,E l,18 
,D,3A,80,C3,E6,F,20,4,3E,4,18,1,AF,81,CD,0 
, C3, El, C9, C5,21, E8, IA, 3A, 84, C3, A7,28,9,47, 
3E,D7,CD,4D,0,#,4726 ’ ’ ’ 

300 DATA 23, 10, FA, 3E, 20, CD, 4D, 0, Cl, C9, 0, E5 

« D 5» 1 jA F ?n 1 ^ F5,21 ’ F2 ’ 1A ’ CD ' 4A ’ 0 ' FB ' 20 > 2®. 

5 An E J 30)CD > 4D,0,3C,FE,3A,20,8,D6,A,CD,4D,0 
,2B,18,E7,CD,4D,0,#,4834 . 

3 o? BATAFE - 31 . 20 •F.B7,20,A,3A,84,C3,3C,32 

,84,C3,CD,60,C5,F1,D1,E1,C9,E5,D5,C5,21,20 

1A ’ i» 20 . 0 . CD,4A,0, FE, E0,38,4, D6, 

C, 18,A,FE,C8,38,19,#,5360 

320 BATA FE, D0,30,15, 3E, D6,9, F5, CD, 4A, 0, FE 
’f 0 Af 0 if’ F i’ CD ’ 4D ' 0 > 18 >1.Fl,A7,ED,42,E7,28 

, 3 ,23, 18, D2, Cl, Dl, El, C9, E5, D5, C5,21,0, 1B, C 

D, 4A,0,23,47,CD,4A,#,5657 

330 DATA 0,4F, CD, 6, C5,2B, 11,60, 18, 6, 7, E, 27 
,CD,4A,0,23,FE,20,20,8,10,F6, A7, ED, 42, E7, 3 

?’ T^?’ Z 8, A7> 28, E ' FE . 5> 30 > 4 > 3E , 7,18, 2, 3E, 3, C 
1.Dl,El,C9,21,#,4293 
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340 DATA 1,1B,CD,4A,0,FE,5C,3E,0,30,F0,3E, 
3, 18, EC, 0,0, 0,0, F5, E5, D5, C5,21, 1, 1B, CD, 4A, 
oi C 5 ,4,47,E6,F8 ’ B8 > 28 ’ 5 '3A,85,C3,18,11.3A, 
81, C3.A7,28,5,#,4553 

350 DATA CD, F3, C5, 18,6,3A, A3, C3, CD, D5, 0, 32 
, 85, C3, A7, 28, 2B, 21,1,1B,FE,7,20, 11,CD,4A,0 
,FE,10,38,1D,6,4,3D,CD,4D,0,10,FA,18,13,FE 
,3,20,F,CD,4A, 0, #, 4387 

360 DATA FE,D4,30,8,6,4,3C,CD,4D,0,10,FA,C 
1,Dl,El,Fl,C9, D5,57,3E,6,IE, 8, CD, 93,0, 3C, 1 
E,97,CD,93,0,3E,A,IE,10,CD, 93,0,3C, 1E,0,CD 
,93,0,3C,IE,9, #,4571 

370 DATA CD, 93,0,3C, IE, 0, CD, 93,0,7A, Dl, C9, 
D5,57,3E,4,IE,0,CD,93,0,3C, IE, C, CD, 93,0, 3C 
,IE,IE,CD,93,0,3C,IE,93,CD,93,0, 3E, A, IE, 10 
,CD,93,0,3C, IE, #,4149 

380 DATA 0,CD, 93,0,3C,IE,13,CD,93,0,3C,IE, 
0,CD,93,0,7A,Dl,C9,F5,E5,21, C, 1B,3E,D1,CD, 
4D,0,CD,CC,C6,El,Fl,C9,C5,21,C,1B,CD,4A,0, 
FE,Dl,20,2A,3A,81, #,5432 
390 DATA C3, A7,28, 4,3E, FF, 18,6,3A, A3, C3, CD 
,D8,0,FE,FF,20,33,CD,Al,C6,23,E5,21, 1, 1B,C 
D,4A,0,El,C6,E,CD,4D,0,2B,3E,7F,18,E,D6,4, 
FE,B,30,8,3E,Dl,#,5149 

400 DATA CD,4D,0,AF, 18,F,CD,4D,0, 47,23, CD, 

4A,0,4F, CD, 6, C5,CD, 4A,0,Cl,C9, 0, 0,0,6,6,CD 
, 13, C7, A7, C8, FE, 20,20,3, 10, F5, C9, FE, D6,20, 
8,3E,20,CD,4D,#,4792 

410 DATA 0,C3,3,C7,FE,C0,38,15,FE,D0,30,11 
, CD,IC,C3,CD, 3, C7,3A,82,C3,87,47,CD,7B,C5, 
10, FB, C9, FE, DE, 30, EB, FE, DA, DA, 3, C7, CD, 86, C 
A, 18, E4,0,81,81,81,91,#,6840 
420 DATA 91,91,91,91,81,8’l,81,91,91,91,91, 

91.91.91.91.91.91.91.91.91.91.91.91.91.91, 
91,91,91,81,81,81,91,91,91,91,91,81,81,81, 

91.91.91.91.91.91.91.91.91, #, 6816 

430 DATA 91,91,91,91,91,91,91,91,91,91,91, 

91.71.71.71.71.71.71.71.71.71.71.71.71.71, 

71.71.71.71.71.71.71.71.71.51.51.71.71.71, 

71.71.71.51.51.71.71.71.71, #,5680 

440 DATA 71,71,71,71,71,71,71,71,71,71,71, 

71.71.71.71.71.71.71.51.51.71.71.71.71.71, 
n.Sl.Si.Fl.Fi.Fi.Fl.Fi.Fl.Fl.Fl.Fl.Fl.Fl, 
Fl,Fl,Fl,Fl,Fl,Fl,Fl,Fl,Fl,#,7856 

450 DATA Fl, Fl, Fl, Fl,Fl,Fl,Fl,Fl,Fl,F1,F1, 

Fl, Fl,Fl, Fl,Fl, Fl,Fl,Fl,Fl,Fl,Fl,Fl,Fl,Fl, 

Fl,Fl,Fl,BI,BI,Fl,Fl,Fl,Fl,Fl, Fl, Fl, Fl, 81, 

6F,6F,81,Fl,Fl,Fl,Fl,Fl,Fl,#,10956 

460 DATA F1,F1,F1,F1,F1,F1,F1,F1,F1,F1,F1, 

Fl,Fl,Fl,F1,F6,F6,F6,F6,Fl,Fl,Fl,Fl,F6,F6, 

F6,F6,F1,F1,F1,F1,F1,F1,F1,F1,F1,F1,F1,F1, 

Fl,Fl,Fl,Fl,Fl,41,41,41,41, #, 10904 

470 DATA 41,41,41,49,41,41,41,41,41,41,41, 

49.94.94.94.91.91.91.91.91.94.94.94.91.91, 

91.91.91, 11,0,26,21,AC,C7,1,10,1,C3,5C,0,E 
5,D5,C5,CD,4A,0,EB,CD,#,5256 

480 DATA 4D, 0, EB, 23, 13,B,78,BI,20,Fl,Cl,Dl 
,El,C9,3E,1,CD,5F,0,21,E9,F3,3E,3,77,23,3E 
, 1,77,23,77,CD, 62,0,3E,2,CD,5F,0,3A,E0,F3, 
E6, FC, F6,2, 47, E, #, 5209 

490 DATA 1,CD,47,0,CD,69,0,21,3,1B,3E,5,CD 
,4D.0.21,7,1B,CD,4D,0,3E,2,21,F,1B,CD,4D,0 
, 3E, A, 21,B, 1B, CD, 4D, 0,0,0,0,21,BF,1B,11,0, 

0,1,0,#,2463 

500 DATA 8,CD, 5C,0,CD,50,C0,CD, DC,C0,CD,B8 
,Cl,CD,D4,C2,0,0,0,3E,20,21,0,18,1,0,3,CD, 
56,0,21,0,20,1,0,8,3E,31,CD,56,0,CD,BC,C8, 
21,0,20,11,#,4189 

510 DATA 0,28,1,0,8,CD,C8,C8,11,0,30,CD,C8 
,C8,26,0,50,CD,C8,C8,16,10,CD,C8,C8,3E,1,3 

2, AF, FC, C9, 0, E5, D5, C5, 21,20,18,11,7F, IA, 1, 

20,0,CD,4A,0,FE,#,4895 

520 DATA DC, 38, 15, D6, 4,9, F5, CD, 4A, 0, FE, 20, 

20,6,Fl,CD,4D,0,18,1,Fl,A7,ED,42,E7,28,3,2 

3, 18, DE, Cl, Dl, El, C9, 0,0, 0, E5, 2A, A5, C3, 4E, 1 


530 DATA 3, 21,8D, C3,22, A5, C3, 6,0,21,40,18, 
9,3E,DD,CD, 0,C3, El,C9,E5,D5,C5, 21, BF,IA,11 
,20,18,CD,4A,0,FE, DD,20,A,D5,11,20,0, CD, 5B 
, C4, Dl, 18,2A, FE, D0, #, 5260 
540 DATA 20,5,CD,2B.C4,18,21,FE,Dl,20,5,CD 
, 37, C4,18, 18, FE, D2, 28,4, FE, D8,20, 5, CD, 40, C 
4, 18, B, FE, D3,28, 4, FE, D9,20,3, CD, 49, C4,2B, E 
7,30, Cl, CD, C5, C3, CD, #, 5866 
550 DATA ED, C3,21,0, 18, 1,20, 0,79, CD, 56,0, C 
1,D1,E1,C9,0,0,0,E5,D5, 11,4,0,21,1, 1B.CD, 4 
A,0,C6,10,19,CD,4D,0,D6,8,19,CD,4D,0,Dl,El 
, C9,0, D5, C5, #, 4660 

560 DATA 21,0,1B,CD,4A,0,47,23,CD,4A,0,4F, 
CD,6,C5,23,23,11,IE,0,CD,4A,0,FE,20,20,11, 
19,6,5,CD,4A,0,FE,20,20,7,23,10,F6,AF.3C,1 
8,3,4F,AF,79,Cl,#,3709 

570 DATA Dl, C9, 0, 0,0, 0, E5, D5, C5, FE, DD, 20, 6 
, 11,21,0, C3,3E, C3,FE,DC,20,6,11,20,0,C3,3E 
,C3,FE,DB,20,6,11,1,0,C3,3E,C3,FE,DA,C2,58 
,C3,11,0,0,C3, #,5219 

580 DATA 3E, C3, 0, 0,0, E5, D5, C5, FE, D0,38, B, F 
E, DA, 30, 7,3E, 20, CD, 4D,0,18,1F,FE,DA,38,2,D 
6,2,E6,3,11,21,0,28,E,IE,20,FE,1,28,8,IE,1 
,FE,2,28,2,#,4160 

590 DATA IE,0,19,CD,AA,C3,Cl,Dl,El,C9,0,0, 

0 ,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 00 0 ii o 
0, IA, 21,1, 1B, CD, 4A, 0,CB,3F,CB,3F,CB,3F,6F, 

26j $,2815 

600 DATA 0, 19, 23,3E, D0, CD, 4D, 0,23, 23,3C, CD 
,4D,0,11,1D, 0, 19,3C,CD,4D,0,23,23,23,23,3C 
,CD,4D,0,21,0, 1B, IE, 4,3E,Dl,6, 4, CD, 4D, 0, 19 
,10,FA,CD,CC,C6,#, 3474 

610 DATA 6,16, CD, D0, D5, 21,0, 10,2B, 7C, B5,20 
,FB,10,F3.C9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

»0)0,0,0,0,0,0,0,0,0,0,54,0,CF,CE,6A,F5,#, 
2642 

620 DATA D3.D4,41,24,30,22,54,33,32,40,31, 
53,31,34,4D,33,35,30,30,30,4F,33,43,54,32, 

35, 30,40,34,4F,35,56,31,33,44,44,44,44,44, 

44, 44, 44,43, 43, 43, 43,43, 43, #, 3262 

630 DATA 43,43,46,46,46,46,46,46,46,46,44, 

44,44,44,44,44,44,44,46,46,46,46,45,45,45, 

45,44,44,44,44,44,44,44,44,43,43,43,43,43, 

43.43.43.44.44.44.44.44.44, #,3282 

640 DATA 44,44,47,47,47,47,47,47,47,47,46, 

46.46.46, 46, 46, 46, 46, 43, 43, 43, 43, 44, 44, 44, 

44.46.46.46.46.46.46.46.46.45.45.45.45.44, 

44, 44, 44, 43,43, 43,43,43,43,#,3314 

650 DATA 43,43,44,44,44,44,44,44,44,44,53, 
31,34,4D, 31,32, 30,30,47,47,46,46,45,45,44, 

44.46, 46, 45, 45, 44, 44,43, 43,44,44, 44, 44,45, 

45, 45, 45, 46, 45, 46, 46, 46,46, #, 3205 

660 DATA 46,46,47,47,46,46,45,45,44,44,46, 

46.45.45.44.44.43.43.44.44, 44, 44, 45, 45, 45, 
45, 46,45,46,46,46,46,46,46,45,45,46,45,54, 
33,32,4C,31,53,30,4D,34,30,#,3246 

670 DATA 30,30, 30,46,22,0,42,24,3D,22,54,3 
3,32,4C,31,53,31,34,4D,33,35,30,30, 30, 4F,3 
2,43,54,32,35,30,4C,34,4F,36,53,31,34,4D,3 

1.32.30.30.44.44.44.44.44, #,2752 

680 DATA 44,44,44,43,43,43,43,43,43,43,43, 

46.46.46.46.46.46.46.46.44.44.44.44.44.44, 

44.44.46.46.46.46.45.45.45.45.44.44.44.44, 

44.44.44.44.43.43.43.43.43, #,3279 

690 DATA 43,43,43,44,44,44,44,44,44,44,44, 

47.47.47.47.47.47.47.47.46.46.46.46.46.46, 

46,46,43,43,43,43,44,44,44,44,46,46,46,46 

46.46.46, 46, 45, 45,45, 45, 44, #, 3317 

700 DATA 44,44,44,43,43,43,43,43,43,43,43, 
44,44,44,44,44,44,44,44,56,31,33,4F,35,47, 

47.46.46.45.45.44.44.46.46.45.45.44.44.43, 
43,44,44,44,44,45,45,45,45,#,3254 

710 DATA 46,45,46,46,46,46,46,46,47,47,46, 

46.45.45.44.44.46.46.45.45.44.44.43.43.44, 

44)44 AA /IR /IR /IR A R Aa a c AA AA AA AA AA 





D iJ A o£ l ’ 53 1 3 ®. 4D,3 4 ,30,30,30,3®,46,22, 
0,43,24,30,22,54,33,32,40,31,53,31,34 4D 3 

f’fo’co' 0A’?n’ 4F ’ 32, 43,54,32,35,30,40,3414 
F,32,53,30,4D,33,30,30,30,#,2713 

? 4 ’ 44 ’ 45 > 44 > 4 4,44,45, 44, 43, 43,44, 
43 ’ 43 ' 43 > 44 > 43 > 43 > 43, 45, 43, 43, 43, 45, 43,44, 
44 ’ f* ’?=’I 4 ’ 45,44 ’43,43, 44,43,43, 43,45, 

44.44.44.45.44.44.44.45.44, #,3256 

If ®*? ATA 43 >43,44,43,43,43,44,43,44,44,45, 

44.44.44.45.44.45.45.46.45.45.45.46.45.44, 

44.45.44.44.44.45.44.43.43.44, 43,44,44,45, 
44,44,44,46, 44,44, 44,46, 44, #, 3274 

IoM? A H 43 ’ 43 ’ 45 ' 43 > 43 > 43.45, 43, 43, 43, 44, 
43 '43.43,44,43,43,43,45,43,43,43,45,43,47, 
47,46,46,45,45,44,44,46,46,45,45,44,44,43, 

43.43.43.44.43.44.44.45.44, #,3264 
IS 0 ,? A I A 45, 44,45,45,45,45,45,45,46,46,45, 
45, 44, 44, 43, 43, 45, 45, 44, 44, 43, 43, 43, 43, 43, 
43,43,43,44,44,44,44,45,44,45,45,45,45,45, 
45,45,45,46,45,54,33,32,40,#,3270 

770 DATA 31,4D,34,30,30,30,30,45,22,0,50,4 
C ’ 41 > 59, 41,24, 20, 42, 24, 20, 43, 24,0, El, 22, 60 
, CB, F5, El, 22, 6A, CB, ED,53,6E,CB,ED,43,70,CB 
,21,79,CE,22,D,FF,3E,03,#,4731 

780 DATA 32,C,FF,21,5D,F5,03,73.41.3B,09,3 
2,0, FF, ED, 4B, 70,CB, ED,5B,6E,CB,2A,6A,CB,E5 

’?1’£ A ’ 6C,CB,B9, 11»5E,F5,7E,12,A7,08,23,13 
,18,F8,Cl,21,34,41,22,8,#,5896 
790 DATA FF,3E,03,32,7,FF,3E,1,32,BI,FB,21 
,72,CB,CD,8F,CE,CD,57,CE,21,66,CC,CD,8F,CE 
,CD,57,CE,21,5C, CD, CD, 8F, CE, CD, 57, CE, 21,4A 
,CE,CD,8F, CE, CD,57, CE,C5,#,7102 

£ A H 3E * C9 > 3 2,7,FF, 1E,0,6,3,3E,8,4F,CD 
,96,0,83,5F,79,3C,10,F6,7B,A7,C8,18,EB,21, 
EE,IA,11,86,C3,6,7, IA,4F,CD,4A,0, 13, 23, B9, 
D8, 20, 3, 10, F3, C9, #, 4526 

8 1 0 ^ DATA 21 > EE > IA. H, 86,03, 1,7,0,CD, 59,0,0 
,0,0,C9,3E,2,5F,CD,D8,0,A7,7B,C0,3D,FE,FF, 
20,F4,C9,0,E5,D5,C5,F5,CD,9C,0,28,FB,CD,9F 
, 0, FE, 1B, 20, F4, #, 5712 

82 ® DATA F1 . Cl. Dl, El, C9, AF, 32, A4, C3,32, 80, 
3 nA 32 ’ 3 ^’ 33 ’ C^VC 3 » 0^ 3E,3,32,84, C3, 3E, 40,32 
,83,C3,21,E0,IA,CD,F8,C4,20,53, 48, 49, 45,4C 
,44,20,D7,D7, D7,20,20,20,#,5926 
830 D ATA 30, 30,30, 30,30,30,30,20,20,20,5A, 
4 F ,4E’45,20, 31 ,0,21.,0, 1B, 3E, 87, CD, 4D, 0, 21, 

4,1B,CD,4D,0,21,8,1B,CD,4D,0,21,1,1B,3E,74 
,CD,4D,0,CD,33,CA,#,3043 
840 DATA 21,C,1B,3E,Dl,CD,4D,0,3A,81,C3,A7 
,20,2,3E,1,32,82,C3,21,FD,IA,C6,30,CD,4D,0 
, C9, 0,0,20, 20, D5,20, 20, 20, 20,20, 20,20, C0, C 

1.20.20.20, 20, 20,20,#,3765 

850 DATA 20,20,20,C0,Cl,20,20,20,20,20,20, 
20, M’ 20, 20,20,20,20, 20, 20,20, 20, 20, 20, C2, 

C3,20,20,20,20,20,20,20,20,20,C2,C3,20,20, 

20 .20.20.20.20.20.20.20.20, #, 2687 

860 DATA 20,20,20,20,20,20,20,20,20,20,20, 

20 ,20,20,20,20,20,20,20,20,20, 20, 20, 20, 20, 

20, 20,20,20,20,20,20, D0, D0, D0, D0, D0,20, D0, 

D0,D0,D0,D0, 20,D0,20,20,20,#, 3472 

870 DATA D0,20,D0,D0,D0,D0,D0,20,20,20,20, 

20.20.20.20.20.20.20, D0,20,20, 20, 20, 20, D0 

20 .20.20, D0,D0,20,D0,D0,20,D0,20,20,20,20, 

20 .20.20.20.20.20.20.20.20, #,3824 

880 DATA 20, 20, D0,20,20,20,20,20,D0,20,20, 

20, D0,20, D0,20, D0,20, D0, D0, D0, D0, 20, 20, 20, 

20, 20, 20,20,20,20, 20,20, 20, D0,20, 20, 20,20, 

20,D0,20,20,20,D0,20,20,20,#,3648 

890 DATA D0, 20, D0,20,20,20,20,20,20,20,20, 

C0,Cl,20,20,00,Cl,20,D0,20,20,20, D0.D0, D0, 

D0, D0,20, D0,20,20, 20, D0, 20, D0, D0, D0, D0, D0. 

20.20.20.20, C2, C3,20, 20, C2, #, 5305 
900 DATA C3, 20,20,20,20,20,20,20,20,20,20, 

20 .20.20.20.20.20.20.20.20.20.20.20.20.20, 

20 ,20,20,20,20,20,20,20,20,D0,D0,D0,20,D0, 

D0, D0, 20, 20, D0, D0,20, D0,20, #, 3283 


910 DATA D0,20,D0,D0,D0,20,D0,D0,D0,20,D0, 
D0,20,20,20,20, 20,20, D0,20, 20,20, 20, D0,20, 
20, D0, 20,20,20, D0, 20, D0,20, 20, D0,20, 20, D0, 

20.20.20, D0,20,D0,20,20,20,#,4704 
920 DATA 20,20,D0,D0,20,20,20,D0,20,20,D0, 
20, D0, 20, D0, D0, D0,20, 20, D0, 20, 20, D0, D0, D0, 
20, D0,D0, 20,20,20,20,20,20,D0,20,20,20,20, 
D0, 20, 20, D0,20, D0,20, D0, 20, #, 4880 
930 DATA D0,20,20,D0,20,20,D0,20,20,20,D0, 
20, D0, 20, 20,20,20,20, D0,20,20,20, D0, D0, D0, 

20.20, D0, D0,20, D0,20, D0, 20,20, D0,20,20, D0, 
D0, D0, 20, D0, 20, D0, 20, 20,20, #, 4880 
940 DATA 20,20,20,20,20,20,20,20,20,20,20, 

20.20.20.20.20.20.20.20.20.20.20.20, 20,20, 

20,20, 20,20,20,20,20,20,20,20,20,20,20,20, 
20, 20,20, 20, 20,20,20,20,20,#,1536 
950 DATA 20, 20,20,20,20,-20,20, 20,20, 20,20, 
20, 20, 20, 20,20,20,20,20,20, 20,20, 31, 39, 38, 
37,20,20,42,59,20,53,2E,57,45,49,47,45,4C, 

20,20,20,20,20,20,20,20,20,#,2034 
960 DATA 20,20,20,20,20,20,20,20,20,20,20, 

20,20,20,20,20,20,20,20,20,20,20,20,20,20, 

20.20.20.20.20.20.20.20.20.20, C0, Cl, 20,20, 

20.20.20.20.20.20.20.20.20, #, 1857 

970 DATA 20,20,20,20,20,20,20,20,20,20,20, 
20, 20,20, 20,20, 20,20, 20, C2.C3,20, 20, 20, 20, 

20,20,20,20,20,20,20,20,20,20,20,20,20,20, 

20,20,20,20,20,20,20,20,20,#,1861 
980 DATA 20,20,20,20,20,20,20,20,20,20,20, 

20.20.20.20.20.20.20.20.20, 20, 20, C0, Cl, 20, 

20.20.20.20.20.20.20.20.20.20.20.20.20.20, 

20,20,20,20,20,20,20,20,20,#, 1857 

990 DATA 20,20,20,20,20,20,C2,C3,20,20,20, 

20.20, 20, 20,20, D4,20, 20, 20, 20, 20, 20, 20, 20, 

20.20, C0,Cl,20,20,20,20,20,20,20,20,20,20, 

20.20.20.20.20, D5,20,20,20,#,2543 

1000 DATA 20,20,20,20,20,20,20,20,20,20,20 

,C2,C3,20,20, 20,20, 20,20,20,20, 20,20, 20, 20 

, 20,20,20,20, 20,21, AE, CF, 11,0,18,1,0,3, CD, 

5C,0,C9,0,0,0,0,0, #,2242 

1010 DATA 0, AF,CD, 03,0,21,65,18,CD,F8,C4,5 

4,20,49, 20,4D, 20,45,20,20,20,46,20,49,20,4 

7,20,48,20,54,20,45,20,52,0,21,EA,18,CD,F8 

,C4,48,49,47,48,20,30,30,#,3946 

1020 DATA 30,30, 30,30,30,0,21,A4,19,CD,F8, 

C4,50,52,45,53,53,20,44,20,46,4F,52,20,44, 

45, 4D,4F, 4E,53,54,52,41,54,49,4F,4E,0,21,7 

, IA,CD,F8,C4,50,52,45,53,#,3931 

1030 DATA 53,20, 46, 49,52,45,20,54,4F,20,53 

,54,41,52,54,0,11,EF,18,21,86,C3, 1,7,0,CD, 

5C,0,09,0,0,0,0,0,0,21,0,18,1,E0,2,3E,20,C 

D, 56,0,21,C,#,2896 

1040 DATA 1B,3E,Dl,CD,4D,0,CD,FF,CA,21,2B, 
19,CD,F8, C4,47,41, 4D,45,20, 4F, 56, 45, 52, 0, 6 
, 5, 21,0, 0,2B, 7C, B5,20, FB, 10, F6,3A, 81, C3, A7 
,CC,EA,CE,C9,0,0,0,#,4953 
1050 DATA 0,0,0, 0,0, CD, B5, CA, CD, CC, C6, 6,8, 

E, 7,CD,47,0,6,0,10,FE,6,1,CD,47,0,3A, 84,C3 
,3D,FE,FF,20,5,CD, 43,D3,37,C9, 32, 84, C3, CD, 
60,C5,A7, C9, #, 5039 

1060 DATA 0,0,0,0,3E,20,21,0,18,1,E0,2,CD, 
56,0,21,C,1B,3E,Dl,CD,4D,0, 3A, 82, C3,3C, 32, 

82, C3, FE, 5,38, 2,37, C9,21,4D, 19, CD, F8, C4,5A 
,4F,4E,45,0,3A,#,3843 

1070 DATA 82,03,21,52,19,C6,30,CD,4D,0,3A, 

83, C3,D6,10,32,83,C3,6,5,21,0,0,2B,7C,B5,2 
0,FB»10,F6,21,4D,19.3E.20,1,6,0,CD,56,0,A7 
,C9,0,0,0,0,21,#,3848 

1080 DATA 0,18,1,E0,2,3E,20,CD,56,0,11,4,0 

,3E.87,6,3,21,0,1B,CD,4D,0,19, 10,FA, C5,10, 
FE,Cl,10,FA,3D,FE,D0,20,EA,0,21,8, 19,CD,F8 
,C4,43,4F,4E,47,#,4221 ’ 

1090 DATA 52,41,54,55,40,41,54,49,4F,4E,53 
,0,21,44,19,CD,F8,C4,59,4F,55,20,48,41,56, 
45,20,52,45,54,55,52,4E,45,44,20,53,41,46, 
45,4C,59,0,6,9,21,0,0,#,3387 


91 







11®® DATA 2B, 7C, B5,20, FB, 10, F6,3A, 81, C3, A7 
, CC, EA, CE, C9, 0, 0,0,0, 0, 0, 0,0, AF, CD, C3, 0,21 
,2, 18, CD, F8, C4,53, 45, 4C, 45,43,54,20, 54,49, 
4D,45,20,5A,4F,4B, #,4632 

1110 DATA 45,20,31,2D,34,0,21,1,16,22,DC,F 
3,CD,9F,0,FE,31,38,F9,FE,35,30,F5,D6,30,32 
, 81, C3, C9,0,0,0, 0, 0, 0, CD, 90, 0, CD, DE, C8, CD, 
AE,D2,AF,32,9B,FC,#,5406 
1120 DATA CD,9A,CE,CD,Cl,D2,21,0,0, 22, A8, C 
3,0,0,0,0,0,CD,10,CF,28,E,FE,3,30,A,32,A3, 
C3,AF,32,81,C3,C3,IC,D5,CD,9C,0,28,11,CD,9 
F,0,FE,44,28,4,#,4941 

1130 DATA FE, 64,20, 6,CD,87, D4, C3,IC,D5,2A, 

A8,C3,2B,22,A8,C3,7C,B5,20,CC,3E,1,32,81,C 

3,0,0, CD,35, CF,CD,43,C6,CD,33,CA,CD,6A,C7, 

CD,4D,CA,20, 6, CD,85,D3,#,6177 

1140 DATA DA, C3, D4,3A, 82, C3, FE, 4,28,15,CD, 

69, C4,3A, 80, C3, E6, F, CC, B5, C5, 3A, 80, C3, E6, 7 

,CC,1F,C5,18,13,CD, D4,C9,3A,80,C3,E6,F,CC, 

80, C9,3A, 80, C3, E6,7, CC, #, 6733 

1150 DATA B5,C9,CD,4D,CA,20,6,CD,85,D3,DA, 

C3,D4,CD,9C,0,28,8,CD,9F,0,FE,1B,CC,20,CF, 

0, CD, 43, C6, CD, 33, CA, CD, 4D, CA,20,6, CD, 85, D3 

,DA,C3,D4,CD, 6A, C7, 0, #, 6709 

1160 DATA 0, 0,3A, 80, C3,3C, 32,80, C3, 20, 28,3 

A, A4, C3, 3C, 32, A4, C3, FE, 5, 20,1D, AF, 32, A4, C3 

,CD,B4,D3,38,E,21,FD,IA,3A,82,C3,C6,30,CD, 

4D,0,C3,1F, D5, CD,F, D4, #, 5436 

1170 DATA C3, C3, D4, CD, B7,0, D2, 1F, D5, CD, 56, 

1,C3,C3,D4,FF,C5,21,20,18,11,60, 1A,CD,4A,0 

,1,DF,FF,FE,D0,28,28,1,El,FF,FE,Dl,28,21,1 

,DE,FF,FE,D2,28, IA, 1, #, 6344 

1180 DATA E2, FF, FE, D3,28, 13,23, E7,20, DD, CD 

,ED,C3,21,0,18,1,20,0,79,CD,56,0,Cl,C9,D5, 

50,59, CD, 17, C4, Dl, 18, E4, AF, 32, DE, F3, 18, A, 4 

3, 4C, 45, 41,52,31,35,30, #, 5557 

1190 DATA 30, 0,21,42, D6,22, 8, FF, 3E, C3,32,7 

,FF,21,18,D6,11,5E,F5,7E,12, A7, 28, 4, 23, 13, 

18, F7,21,5D, F5, C3,73, 41,3E, C9, 32,7, FF, C3, C 

3,D4,#,4457 

1200 DATA * 

1210 DEFIHTA-Z: SCREEN0: WIDTH36:C0L0R15,4:K 
EYOFF 

1220 RESTORE:Z=&HC900: TL=0 

1230 READZS: IFZ$="*"THEiri260 

1240 IFZ$< >”#”THENX=VAL <"&H”+Z$):POKEZ,X:T 

L=TL+X:Z=Z+1:GOTO1230 

1250 READT: PRIHT"CHECK: ”; T"=”TL: IFT=TL THE 
HTL=0: GOTO1230 ELSE PRINT”DATA ERROR IN”;P 
EEK(&HF6A3)+256*PEEK(&HF6A4):BEEP:END 
1260 DELETE10-1260 

1270 CLS:DEFINTZ:FORZ=&HC000TO&HD649:POKEZ 
,PEEK(Z+&H900):L0CATE15,10:PRINTHEXS(Z):NE 
XT:DEFUSR=&HD612 

1280 LOCATE0, 10: PRINT”BSAVE"CHR$ <34>”TIMEF 
I”CHR$(34)", &HC000, &HD649,&HD612":END 



NftBESTEUUNGEN OUDE NUMMERS 
MSX-GIDS: 

De nummers 1 t/m 8, alsmede de nummers 10 en 11 
van de MSB Gids zijn GEHEEL UITVERKOCHT. Hieron¬ 
der volgt een overzicht van de nummers, welke nog 
wel verkrijgbaar zijn met een beknopte omschrijving 
van de inhoud: 

MSH GIDS NUMMER 9 

USTINGS: 

VOORBEREIDEND ONTLEDEN 1 t/m 3, ZEELAND, LIMBURG 
EN N-BRABANT PER HELICOPTER, CALCULATOR 
Verder de cursus BASIC (1), Omzetten cassette naar 
disk (1), Autofire knop (zelfbouw). Test PHILIPS 
NMS8250/8255 MSH-2 computer en diverse software- 
beschrijvingen, waaronder Print Hpress en STARQUA- 
KE met Kaart. 

MSX GIDS NUMMER 12 

USTINGS: 

MAZE, SCRAMBLE, DISKLOADER, MSK DUMP SCREEN 2, 
BALLETJE- BALLETJE (MSH-2), TITELDOOS (MSK-2) 
Verder de cursus BASIC, machine taal en Rekenen op 
de MSX. Test NMS- 8280 en 20 softwaretitels be¬ 
schreven. 

MS X-GIDS EXTRA E DITIE X2 

USTINGS: 

MEXICO GOOIEN, EUROPA PER HELICOPTER, WERELD PER 
HEUCOPTER, HOU JE VAST!, SPROKKELEN, LIJNTREK¬ 
KEN, JACKPOT, EEN- EN TWINTIGEN, FLYING HERO, 
SCREENDUMP SCREEN 1, RABBIT HOLE, CHANGE CHA- 
RACTER 

Verder softwarerecensies Arkanoid en MSX Artiest 
MSX-GI DS NUMM ER 13 

LI5TIN65: 

POSTER DESIGNER. JUMPING JACK, WRITING RACE, 
BESTAND (DATA BASE), WOORDENLADDER, SCHUIFPUZ¬ 
ZEL, REKENMATRIX, DE MUUR (MSX-2), BINAIR. 

Verder "Rekenen op de MSX" (2), MSX-Machinetaal (4), 
Test Philips NMS1255 Modem, veel softwarerecensies 
(o.a. Maze of Galious t Q-Bert), spelpoke’s en tips. 

MS X-GIDS NU MMER 14 

USTINGS: 

SPREADSHEET, OPTELLEN EN AFTREKKEN, MENS ERGER 
JE NIET, DOMINEUR, RAIDER 

Verder: MSX-Machinetaal (5), Rekenen op de MSX (3), 
Leer, Probeer en Programmeer (5) en veel software- 
en adventurerecensies, tips, poke’s, kaarten. 

MSX-GIDS NUMMER 15 

USTINGS: 

SCREEN 1 EDITOR, BREAK-IT, MUSIC COMPOSER, BARRIÈ¬ 
RE. 

Verder: Rekenen op de MSX (4), Leer, Probeer en Pro¬ 
grammeer (6), MSX Machinetaal (Slot), Hardwaretests 
van Philips NMS 1205 Muziekmodule en NMS 1160 Key¬ 
board ♦ veel softwarerecensies, spel- en adventure- 
tips (o.a. kaart Super Rambo Special). 

Oude nummers zijn te bestellen door overmaking van 
Fl. 7,95 per exemplaar op Postbanknummer 5036011 
t.n.v. J.Herps te Lelystad. Voor Belgis Bfr. 155 op 
Bankrekeningnummer 235-0430464-87 bij de Generale 
Bank te Hasselt t.n.v. J.Herps, Postbus 516, 8200 AM 
LELYSTAD. 
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DRAW 

?f?" * s een teken P r °3ramma ■ U kunt er mee 
ïïhthn’k u n J nk ' Buren * °P eenvoudige wijze 
vomln T.k’ J r,eh . oeken en h J nBn maken - Cirkels in 9 
tek?nin' B T ïn " inv0B S e P- Stippellijnen trekken. De 

nntinnï 0 n" naar het 9 B n eu 9 e n brengen. Het 
potlood versnellen en vertragen. Het scherm in 4 

r‘ n ht . n i Bn , acr 5 ,Bn - Spiegelen in de x-as en de g-as. 

k . rde n 9 aanbren 9 en - Het scherm door 

ïiven eï ï;in n, r De °P disk of cassette 

"l'“ an laden. Twee formaten uitprinten, 15 voor- 

fchak«if Uren aB,B 1 f t . Bren / De cassettemotor aan/uit 
schakelen en een hulpscherm opvragen. 

J Bt , Programma bsstaat uit twee delen. Het eerste 
deel is in BASIC, het tweede deel in machinetaal 
geschreven. Het BASIC deel laadt het MT-deel en 
voert die instructies uit, die in MT erg veel code 

BASTr n H Vr | aSen j D l Ca J 85ettB9Bbruiker dient eerst het 

het MT H.pf P wï Sfx 'i tB * dlrect a ev olSd door 
het MT-deel. Het MT-deel wordt met een BASIC hun¬ 
programma aangemaakt en moet dan in het bsave 
formeat gesaved worden. Het hulpprogramma geeft 

h | ino W i JZ nsBn voor - In het BASIC deel staat op 
regel 108 twee maal een bload instructie, gescheiden 
door een '-teken. Afhankelijk van het door u 
gebru'kte opslag- medium, leunt u 1 van die 

QTnonu t e8 we9 . a ^nn‘ De in5tru cties 0NST0PG0SUB en 
„JJ P V 0N . in rB 9 el , 100 dienen niet om een stop onmo¬ 
gelijk te maken (stoppen doet u met ESC), maar om 
sen goede voortgang van het programma te 
c?np r, 4p B Als “ nk in bet machinetaal deel op CTRL 
„ vV gebeurt er niets, maar de computer 

XXJï d t 1 , en ,f S het P ro 9 ramma later een BA5IC- 
Rrïfk Ict J B wil uitvo fren reageert de computer met 
Break. Hetzelfde geldt voor de STOP- toets alleen. 

2LÏ £? “ ach i netaal deBl ingedrukte STOP- toets 
levert bij terugkeer in BASIC een pauze op, die u 
met de STOP- toets weer opheft. P 

HANDLEIDING: 

Hoewel het programma een menu/ hulpscherm kent, 
*ijn een paar extra aanwijzingen noodzakelijk: 

Het tekenen kan zowel met de cursor- toetsen als 
met joystick 1. U hoeft hier niet vooraf te kiezen, 
maar kunt gebruiken wat u wilt. 

versneHen en vertragen van het potlood doet u 
door de >- of <-toets (met Shift dus) kortere of 
langere tijd ingedrukt te houden. 

CiX| d M Pti r D ,li Bh0 * Cd) .' Li J" (1) > Rechthoek (r) en 
Cirkel (c) gebruikt u de kleine letters d,l,r en c om 

dHehïïk ,h“ te 9 ! VBn ' Met uitzondering van de 
voir d' drlUTrl. 0Pt ‘“ nod ‘S’ 

JJ B dB matB van cirkelafplatting te veranderen geeft 
ü/iÏÏ?? ! n \9 BVol9d door een cijfer tussen 1 en 9. 

hat ‘ïl d r uk \ en van Shift-c blijft het programma 
onbeweeglijk tot een cijfer ontvangen is. 

Om? Va ü * t8k5t Hordt geactiveerd door de 

5i;r ren , " n 5iuit u 

Met de letter v brengt u rondom een schaalverdeling 
aan, die u met opnieuw een letter v weer weghaalt. 


krlJ9t u btt 



üfi ff» br8n0t U L dB tekening naar het geheugen, 
met INS weer naar het scherm. u 

x en jj spiegelen het scherm in zijn assen. 

2™^ Be P /unutia aan die alle bytes zowel in de 
karaktertabel als in de kleurtabel 1 bit roteert. 
Daardoor kunnen verrassende effecten ontstaan. Na 
terug 8 S het oors pronkeIIjko scherm weer 

£* ef. r ,°. llBn d0Bt , u met de cursortoetsen terwijl u 
£ lff Sh *^ft-toets ingedrukt houdt. Met ingedrukte 

t8 B n e B C M f ? ra 1,4 of 8 verandert u de 
verticale scrollafstand (1, 4 of 8 pixelrijen tegelijk). 

Met ingedrukte Shift-toets en de letter s tekent 
het programma stippellijnen. 

fa wissen aan altijd eerst wissen uit dan pas is 
tekenen aan weer mogelijk. r 

bet hulp/menu scherm. De tekening wordt 
tijdelijk opgeborgen. 

Saven en Iaden kan op disk of band. U kunt hier 
niet Kiezen, als er een drive aanwezig is saved en 
laadt het programma op disk, anders op cassette. Na 
het aanroepen van de save- of loadinstructies kunt 
u eerst een naam opgeven. Zolang u de naam nog 
niet bevestigd heeft (met RETURN), kunt u de 

makend “ n ° 9 d * DELETE ‘ toets ongedaan 

uf* P hnnk r °rnrr e ‘ S BB , n 3crBendum P' programma, dat 
via hook FDCC aan de service interrupt gekoppeld 

. Hat WBrkt °P elke standaard MSH-printer. 
Mocht bet op uw printer niet werken dan dient u de 
routines INPRL: adres HDDGD, INPRG: adres HDDBC en 
de printer mode bytes: adres HDD7E aan uw printer 
aan te passen. Als u in regel 210 van het BASIC deel 
de poke- instructie weglaat, blijft het printblok 
latent aanwezig en kunt u ook in andere 

2 uitprinten. Het printen kan 
met CTRL-STOP onderbroken worden. 


Als u een gemaakte tekening in een ander programma 
toe wilt passen, dan kunt u in plaats van de normale 
save en load instructies als volgt handelen: De 
2"» met HOMEnear het geheugen brengen en 
met ESC naar BASIC terug. Vervolgens de tekenina 
saven met: bsave"naam“,th9b00,4hd489,ihd4G9. De 

tekening krijgt u terug door: screen 2 en 
bload naam",r 


Ser Versluis. 























'* * 


DRAW 
G.P. Versluis 


’ * 

’* 

’* Door: G.P. Versluis t 

' * * 
'* (c)1988 MSX-Gids Lelystad * 
’ ^ % 
' mmm#m**m*#*#*#**m 


30 
40 
50 
60 
70 
80 

90 

91 

92 

93 

100 C0L0R15,1,1: SCREER0: WIDTH40:CLEAR200,& 
H9B00: DlMF <13): ONSTOPGOSUB230: STOPOJT 
108 BLOAD”DRAV.HEX":’bload"cas: DRAW" 

110 DEFUSR=&HD000 :DEFUSR1=&HD02E:DEFUSR2=& 
HDC6D:A=USR2(0):A=ÜSS(0) 

114 ’ 

120 B=0:FORI=&HCEA0TO&HCEBASTEP2: F(B)=PEEK 
Cl):B=B+1:NEXT:C=PEEK(&HFCB7): D=PEEK(&HFCB 
9) 

130 A=PEEK (&HCEF0 ) 

140 ONAGOSUB150,160,170,180,190, 210:A=USR1 
(0):GOTO120 
142 ’ 

150 LIRE(F(0),F Cl))-CC,D):GOSUB220:RETURR 
160 LIRECFC2),FC3))-CC,D), , B:GOSUB220: RETU 
RN 

170 LIRE CF(4),FC5))-CF C6), F C7)): LIRE CF C4), 
FC5))-CFC8),FC9)):LIRECFC6),FC7))-CFC8).FC 

9)):RETURR 

180 PAIRTCC.D):RETURR 
190 S=SQRCCFC12)-FC10))''2+CFC13)-FC11))''2) 

:A=PEEKC&HD95B)/100:B=l:IFA>1THERB=B/A 
200 CIRCLE CFC10),FC1D), S/B, , , , A: RETURR 
210 COLOR15,4,4: SCREEN0-: POKE&HFDCC, AHC9: ER 

220 FORI=0TO100:REXT: RETURR 
230 RETURR 


DIMT C62),R<63): SCREEN0: WIDTH40 
I =&HD000 : D3>=” dat af out ” 

PRINT”datacheck” : PRINT 

FORQ=1T062:READA:T<Q)=A:B=B+A: NEX 


in che 


10 
12 
14 
16 
T 

18 IFBO441205! THERPRINT"fout 
cksums”:BEEP: LIST100-130 
20 F0RQ=1T063:READA:RCQ)=A:NEXT 
22 RESTORE300:Q=0 
24 B=0;Q=Q+1 

26 READAS: IFA$=”**”THEN32ELSEIFA$=”+ 
+"THEN30 

28 A=VAL<”&h”+ A$):B=B+A:1=1+1:LOCATE 
18,20:PRINTHEXS Cl):G0T026 


30 IFBOTCQ)THENPRINTD$; RCQ) jRCO 
+1):BEEP:ENDELSE24 

32 IFI-1=&HDDFCTHENPRINT”data correc 
t”:PRINTELSEPRINTD$:BEEP:END 
34 CLEAR:CLEAR200, &HD000: RESTORE300 
36 PRINT”data poke”:PRINT: I=&HD000 
38 READAS:IFA$=”++”THEN38ELSEIFA$=”* 
*”THEN40ELSEPOKEI,VAL <”+A$) : LOCAT 
E18,20:PRINTHEXS Cl): 1 = 1 + 1:G0T038 
40 PRINT”saven in bet bsavefornaat" 
42 A$=CHR$ C34) 

44 PRINT:PRINT”Voor disk:”:PRINT:PRI 
NT”bsave”+AS+”DRAW.HEX”+A$+”, &hd000, 
&hddfc”:PRINT 

46 PRINT”Voor cassette:”:PRINT:PRINT 
”bsave”+A$+”cas:DRAV”+A$+”, &bd 000 , &h 
ddfc”; 

48 * 

50 ’ checksums 
52 ’ 

100 DATA 08923,14183,00816,12155 
102 DATA 33517,29638,05313,14604 
104 DATA 02547,03157,00659,00771 
106 DATA 02735,01688,01423,02425 
108 DATA 01022,02882,03583,06262 
110 DATA 22990,02315,08006,09353 
112 DATA 05765,05376,03998,03578 
114 DATA 01579,02058,04226,07387 
116 DATA 13949,12517,06518,05335 
118 DATA 10543,05359,07234,03836 
120 DATA 00507,01379,04653,01016 
122 DATA 01007,05316,05229,16870 
124 DATA 28839,33219,13410,01939 
126 DATA 05337,07074,04591,01136 
128 DATA 01133,01386,00485,01828 
130 DATA 10628,03998 
132 ’ 

134 ’ regelnummers 
136 ' 

138 DATA 300,310,327,334,348,403,428 
140 DATA 436,452,458,465,469,473,478 
142 DATA 483,488,493,497,503,509,519 
144 DATA 543,548,559,570,578,586,593 
146 DATA 599,604,609,616,627,643,659 
148 DATA 668,676,689,697,707,715,719 
150 DATA 724,731,735,740,751,761,780 
152 DATA 810,843,857,862,871,881,888 
154 DATA 893,897,901,906,911,922,930 
156 * 

158 ’ machinecode 
160 

300 

301 

302 

303 DATA ED,73,80,CE,31,80,CE,CD, 38 

304 DATA D0,CD,D3,D0,CD,FF,D2,AF, CD 

305 DATA BD,D3,3E,01,CD,BD,D3,CD,87 

306 DATA D9,CD,A5,D9,18,EC,CD,56,01 

307 DATA 3E,06,32,F0,CE,ED,7B,80,CE 

308 DATA C9,ED,73,80,CE,31,80,CE,C3 

309 DATA 10,D0,+ + 

310 > 

311 * D038 INIT-initiatie 

312 ’ 

313 DATA 01,7D,01,21,82,CE,11,83,CE 

314 DATA 36,00,ED,B0,21,00,F0,22,88 

315 DATA CE,3E,04,32,8A,CE,3E,60,32 

316 DATA 82,CE,3E,80,32,83,CE,21,E9 

317 DATA F3,3E,0F,77,23,32,85,CE,3E 

318 DATA 01,77,23,77,AF,32,DB,F3,21 

319 DATA 80,00,22,B3,FC,22,B7,FC,E5 

320 DATA Cl,21,60,00,22,B5,FC,22,B9 

321 DATA FC,EB,D5,C5,CD,72,00,Cl,Dl 

322 DATA CD,11,01,06,E2,0E,01,CD,47 

323 DATA 00,3E,0F,32,F2,F3,21,B3,D0 


D000 MAIN—hoofdroutine 
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3P<s nl-TA CF ’ F3,01 * 20 > 00 > CD, 5C 

326 DATA CD,F3,CD,5C,00,C9,++ 

ÜO ( 

328 » SPRITE 

329 ’ 

??? mïf ??'?M®* 60 . 60 *30,38,38,1C 

33? SaÏJ *£’^^ 0F ’ 0F ’ 07 ’ 06 ’ 00 » 00 

??? ÏÏ^Ïa 00 . 00 . 00 ,00, 00,00, 00, 00, 00 

333 DATA 00,00,00,00,00,++ 

334 * 

335 ’ D0D3 MENU 

336 ’ 

f? 7 BATA CD ’ 51 , D4 , CD ,D0,D4,2A,B7,FC 

338 DATA E5,2A,B9,FC,E5,3A,F2,F3,F5 

339 Ï^ TA 21 ' 2A » F9, 06,03,7E, F5, 23, 10 

340 SaÏ A FB '21, 00 > 00 ,22,B9,FC,06,19 

341 DATA 11,33,Dl,22,B7,FC,IA B7 28 

342 DATA 06,CD,01,D7,13,18 F6 2A B9 

f 43 mïf FC, C5,01,08, 00, 09, Cl, 22,’ B9 
344 FC,21,08,00,13,10,El,06,03 

f 43 P ATA 21 >2C,F9,Fl,77,2B,10,FB,F1 

nA?f |2,F2,F3,El,22,B9,FC,El,22 

348 ? ATA B7 - FC ’ CD >7D,D9,C9,+ + 

349 * TEKSTEN 

350 ’ 

351 DATA 20,20,20,20,44,52,41,57 20 

352 DATA 28,63,29,’20.’56.’45,52, 53,’!! 
3 ? 3 ™Ïa 4F > 4 D,20,31,39,38,37,00,00 
^ BA £A 20,46,31,20, 74,65,6B, 2E, 20 
333 £*Ï A 31 » 6i, 6E, 20,20, 7C, 46,36, 20 

356 DATA 20,6C,6F,61,64,00 20 46 32 

357 DATA 20,74 65 6B2E 20 75 69 74 

358 DATA 20,20,7C,46,37 20 20 73 61 
339 J? ATA 76 > 65 » 00 1 2 0 ,46,33) 20’ 77*, 69 
330 Etïf 73,2E,20,61,61,6E,20,20,7C 
f 3 * Ï? ATA 43 > 33 > 2®,2®,6B,6C,65,75,72 

332 SaH ? 0 ’ 2(2», 46,34,20, 77,69, 73, 2E 

333 5*1* 20 >75,69,74,20,20,7C,46,39 
222 2aÏ^ 20, 20 ,6B,6C,65,75,72,20,70 

222 2aÏ^ 72, 2 E, 00 ,2®,46,35,20,70,61 

122 DATA 69,6E,74,20,20,20,20,20,7C 

222 £ A Ï A 46,3!,3 0 ,2 0 ,43,4C,53,00,20 

368 DATA 20,3E,20,73,6E,65,6C,6C,65 

222 SaÏa 72 > 20 > 2 0 , 2<2>, 7C, 68,20,20,20 
370 5 ATA 6Ö » 65 > 6C >70,00, 20 ,20,3C,20 

222 2 ATA 74 .72,6i,67,65,72,20,20,20 

372 DATA 20,7C,6D,20,20,20,6D,6F,74 

373 DATA 6F,72,00,20,20,73,20,73,63 

374 DATA 72,61,6D,62,6C,65,20,20,7C 

375 DATA 53,20,20,20,73,74,69,70,70 

376 DATA 65,6C,00,20,20,63,20,63,69 

377 DATA 72,6B,65,6C,20,20,20,20,7C 

378 DATA 43,20,20,20,63,69,72,6B,65 

?7© DATA 6C,20,63,6F,72,2E,00,20 20 
330 6C . 20,6C, 69,6A, 6E, 20, 20, 20 

381 DATA 20,20,20,7C,64,20,20,20,64 

3 ? 2 ÏÏ^Ïa 72 > 39 * 35 .ö8,6F,65,6B,00,20 
12? 5?J A 20,72,20,76,69,65,72,68 6F 
334 ^aÏa 65,6B,20,20,7C,74,20,20,20 

ff 3 £^Ï A ? 4,65,6B,73,74,20,20,00,20 

386 DATA 20,78,20,73,70,69,65,67,65 

387 DATA 6C,20,78,20,7C,79,20,20,20 

388 DATA 73,70,69,65,67,65,6C,20,79 

389 DATA 00,20,20,76,20,76,65,72,64 

39 ? 33 >6C,69,6E,67,00,00,00 ,48 

39 * 4F,4D,45,20,20,69,6E,20,6D 

392 DATA 65,6D,6F,72,79,00,49 4E 53 

393 DATA 20,20,20:75:69:74:2?,6d:I! 

394 DATA 6D,6F,72,79,00,47,52 41 50 

395 data 49 , 20 , 7 ®;7 2 ; 69 ;® E ; 7 I;Sè; il 

2^2 £ ATA 41 » 50 ' 53 «20,20,70,72,69,6E 
f 97 BATA 74,20,67,72,6F,6F,74,00,53 

398 DATA 48,49,46,54,20,73,63,72,6F 


399 

400 

401 

402 

403 

404 

405 

406 

407 

408 

409 

410 

411 

412 

413 

414 

415 

416 

417 

418 

419 

420 

421 

422 

423 

424 

425 

426 

427 

428 

429 

430 

431 

432 

433 

434 

435 

436 

437 

438 

439 

440 

441 

442 

443 

444 

445 

446 

447 

448 

449 

450 

451 

452 

453 

454 

455 

456 

457 

458 

459 

460 

461 

462 

463 

464 

465 

466 

467 

468 

469 

470 

471 

472 

473 


nATA 2£’22’f 0 ’ 2ö ’ 31 ' 2C ’ 34 >2C,38 
2 ?' 00 » 00 »20,47,45,45,46,20 
gfïi J! ; ^.4E,2®,54,4F,45,54,53 

i 

D2FF SCK-onderzoek toetsen 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


21,8C, 
23,Fl, 
2B,CB, 
CB,46, 
D8,CB, 
D3, D0, 
56,CA, 
23,CB, 
E9, D6, 

CA, 3F, 

CB, 6E, 
D4,CB, 
CA,A0, 
56, CA, 
D4,CB, 
CE,CB, 
BA,D4, 
23,CB, 
CA,79, 
7E,CA, 
D6,CB, 
C9, ++ 


CE, AF, 
3C, FE, 
46,CA, 

CA, 28, 
66,CA, 
23,CB, 
65,DC, 
46,CA, 

CB, 5E, 
D7,CB, 
CA,83, 
7E,CA, 
D4,CB, 
21,D0, 
56,CA, 
56,CA, 
23,CB, 
46,CA, 
DB,CB, 
E6, D4, 
4E,CA, 


F5,CD,41, 
09,20,F4, 
84,D3,21, 
D9,CB,4E, 
C2,FD,CB, 
4E, CA, 8F, 
CB,7E,CA, 
1D,D7,CB, 
CA,5D,D8, 
76,-CA,82, 
D4,CB,76, 
8E,D4,23, 
4E,CA,78, 
23,CB,4E, 
69, D4, C9, 
C9, D4, CB, 
46,CA,5C, 
0D,D7,23, 
76,CA,A6, 
23,CB,46, 
D0,D4,CD, 


01,77 
2B, 2B 
8F, CE 

CA, B6 
6E, CA 
D8, CB 
01, D9 
4E, CA 

CB, 6E 
D7, 23 

CA, 89 

CB, 46 
D9, CB 

CA, 51 
21,8E 
5E, CA 
D9, 23 

CB, 6E 
DA, CB 
CA, CD 
FF, D4 


’ D3BD SCJ—cursor/joystick 

5H A CD ' D5 > 00 * C8,3D, CA, E2, D3 
DATA 3D,CA,F8,D3,3D,CA,05,D4 
DATA 3D,CA,12,D4,3D,CA,1F,D4 
DATA 3D,CA,2C,D4,3D,CA,38,D4 
DATA 3D,CA,44,D4,C9,++ 

D3E2 MCRSR-verplaats cursor 


DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 


3A, 82, 

82, CE, 
D0,23, 
28,E3, 

83, CE, 
CE,18, 
EC, 3C, 
CE,FE, 
18,Cl, 
32,83, 
28,AF, 
82,CE, 
CE,18, 


CE, FE, 
2A,88, 
18,F8, 
3C,32, 
FE,FF, 
DB, 3A, 
32,82, 
BE,28, 
3A,83, 
CE,18, 
3D, 32, 
FE,00, 
E7, ++ 


00,28, 
CE,7D, 
3A,83, 
83,CE, 
28,E0, 

82, CE, 
CE,18, 
C7,3C, 
CE,B7, 
E7,3A, 

83, CE, 
28,ED, 


04,3D,32 
B4,CA,A5 
CE,FE,FF 
18,DD,3A 
3C,32,83 
FE,BE,28 
E6,3A,82 
32,82,CE 
28,ED,3D 
83,CE,B7 
18,A9,3A 
3D,32,82 


^ D451 TOM-naar geheugen 

DATA 01,00,18,11,00,9B,2A,CB 

DATA F3,C5,CD,59,00,Cl, 11 ,00 
DATA B4,2A, C9, F3, CD, 59, 00, C9,++ 

* D469 TOS-naar scherm 

DATA 01,00,18,21,00,9B,ED 
DATA 5B,CB,F3,C5,CD,5C,00 
DATA Cl,21, 00 ,B4,ED,5B,C9 
DATA F3,CD,5C,00,C9,++ 

’ D483 DRON— tekenen aan 

DATA 3E,01,32,8B,CE,C9,++ 

| D489 DROF—tekenen uit 

DATA AF,32,8B,CE,C9,++ 
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474 ’ D48E WION— wissen aan 

475 • 

476 DATA CD, 83,D4,3A,F2,F3,FE,01,C8 

4 77 DATA 32,86,CE,3E,01,32,F2,F3,C9 
++ ’ 

478 ’ 

479 * D4A0 WIOF-wissen uit 

480 * 

481 DATA CD,89,D4,3A,86 

482 DATA CE,32,F2,F3,C9,++ 

483 * 

484 ' NAAM 

485 ’ 

486 DATA 40,62,79,20,47,50,20,56 

487 DATA 65,72,73,6C,75,69,73,40,++ 

488 ’ 

489 * D4BA FSTR-sneller 

490 ’ 

491 DATA 2A,88,CE,7C,FE,FF,C8,24 

492 DATA 22,88,CE,CD,AD,D9,C9,++ 

493 * 

494 ’ D4C9 SLWR-trager 

495 * ° 

496 DATA 2A, 88, CE, 25, C3, C2, D4, + + 

497 ’ 

498 ’ D4D0 CLS 

499 » 

500 DATA 01,00,18,2A,CB,F3,AF,C5 

501 DATA CD,56,00,Cl,2A,C9,F3,3A 

502 DATA EA,F3,CD,56,00,C9,++ 

503 ’ 

504 ' D4E6 CHCLR-wijzig kleur 

505 1 ö 

506 DATA 3A, F2, F3,3C, FE, 10,20,02,3E 

507 DATA 01,32,F2,F3,32,85,CE,32,E9 

508 DATA F3,CD,A5,D0,C3,AD,D9,++ 

509 ’ 

510 ’ D4FF SCRG—scroll algemeen 

511 • 

512 DATA 21,8C,CE,CB,4E,20,05,3E,01 

513 DATA 32,8A,CE,CB,66,20,05,3E,04 

514 DATA 32,8A,CE,23,CB,46,20,05,3E 

515 DATA 08,32,8A,CE,AF,CD,D5,00,3D 

516 DATA CA,36,D5,3D,3D,CA,40,D6,3D 

517 DATA 3D,CA,F2,D5,3D,3D,CA,FF,D5 

518 DATA C9,++ 

519 * 

520 ’ D536 SCRU—scroll omhoog 

521 * ° 

522 DATA CD,51,D4,CD,3F,D5,C3,69,D4 

523 DATA CD,89,D4,21,00,9B,22,95,CE 

524 DATA 11,00,9B,ED,53,97,CE,3A,8A 

525 DATA CE,47,3E,08,90,4F,DD,21,00 

526 DATA CC,C5,DD,E5, CD,71,D5, DD, El 

527 DATA Cl,21,00,B4,22,95,CE,11,00 

528 DATA B4,CD,71,D5,C9,3E,20,F5,C5 

529 DATA 7E,DD,77,00,DD,23,23, 10 , F7 

530 DATA 79,B7,28,07,7E,12,13,23,0D 

531 DATA 18, F5, Cl, C5, E5, D5, 11, F8, 00 

532 DATA 19,Dl,7E, 12, 13, 23,10,FA,El 

533 DATA Cl, F1,3D,20,D5,C5,23,10,FD 

534 DATA 79,B7,28,07,7E,12,13,23,0D 

535 DATA 18,F5,Cl,C5,E5,D5,11,F8,00 

536 DATA 19,Dl,7E, 12, 13, 23, 10, FA,El 

537 DATA D5,ED,5B,95,CE,3E,17,82,57 

538 DATA E7,Dl,Cl,20,D3,DD,21,00, CC 

539 DATA 3E,20,F5,C5,23,10,FD,79,B7 

540 DATA 28,07,7E,12,13,23,0D,18,F5 

541 DATA Cl,C5,DD,7E,00,12,13,DD,23 

542 DATA 10,F7,Cl,F1,3D,20,E0,C9,++ 

543 ’ 

544 ’ D5F2 SCRD-scroll omlaag 

545 ’ ° 

546 DATA CD,81,D6,CD,3F,D5,CD 

547 DATA A8,D6,CD,51,D4,C9 ++ 

548 ' 


549 

550 

551 

552 

553 

554 

555 

556 

557 

558 

559 

560 

561 

562 

563 

564 

565 

566 

567 

568 

569 

570 

571 

572 

573 

574 

575 

576 

577 

578 

579 

580 

581 

582 

583 

584 


586 

587 

588 

589 

590 

591 

592 

593 

594 

595 

596 

597 

598 

599 

600 
601 
602 

603 

604 

605 

606 

607 

608 

609 

610 
611 
612 

613 

614 

615 

616 

617 

618 

619 

620 
621 
622 

623 

624 


’ D5FF SCRL-scroll naar links 

DATA CD,51,D4,CD,09,D6,CD,69, D4 
DATA C9,CD,89,D4,11,00,9B,21,00 
DATA 9B,CD,1F,D6,11,00,B4,21 00 
DATA B4,CD,1F,D6,C9,3E,18,F5, 01 
DATA 08,00,D5,11,00,CC,ED,B0,Dl 
DATA 01,F8,00,ED,B0,E5, 21,00, CC 
DATA 01,08,00,ED,B0,El,Fl,3D,20 
DATA E2.C9.++ 

i 

D640 SCRR scroll naar rechts 

» 

DATA CD,51,D4,CD,4A,D6,CD,69,D4 
DATA C9,CD,89,D4,11,FF,B2,21,FF 
DATA B2,CD,60,D6,11,FF,CB,21,FF 
DATA CB,CD,60,D6,C9,3E,18,F5,01 
DATA 08,00,D5,11,08,CC,ED,B8,Dl 
DATA 01,F8,00,ED,B8,E5,21,08,CC 
DATA 01,08,00,ED,B8,El,Fl,3D,20 
DATA E2,C9,++ 

» 

’ D681 TRNI haal gedraaid in 

DATA 01,00,18,2A,CB,F3,11,FF 
DATA B2,C5,CD,99,D6,Cl,2A,C9 
DATA F3,11,FF,CB,CD,99,D6,C9 
DATA CD,EC,07,E3,E3,DB,98,12 
DATA 1B,0B,79,B0,20,F7,C9,++ 

D6A8 TRET0 zet gedraaid weg 

DATA 01,00, 18,C5,2A,CB,F3, 11 
DATA FF,B2,CD,C0,D6,Cl,2A,C9 
DATA F3,11,FF,CB,CD,C0,D6,C9 
DATA CD,DF,07,IA,D3,98,1B,0B 
DATA 79, B0,20, F7, C9, ++ 

’ D6CD SLCLR select printkleuren 

DATA 3A,99,CE,B7,20,0B,3E 
DATA 08,32,EF,D4,32,99,CE 
DATA C3,EE,D4,AF,32,99,CE 
DATA 3C,32,EF,D4,C3,AD,D9,++ 


D6E9 TKST plaats tekst 


DATA CD, C0,00, CD,AD,D9,2A, B7 
DATA FC,22,9A,CE,2A,B9,FC,22 
DATA 9C,CE,11,9D,CE,C3,2F, DA, ++ 

’ D701 SD5 verklein tekst 

» 

DATA CD,8D,00,2A,B7,FC 
DATA 2B,2B,22,B7,FC,C9,++ 


’ D70D PNTS stippellijn 

DATA 3A,8B,CE,B7,28,05,AF,32 
DATA 8B,CE,C9,3C,32,8B,CE,C9,++ 

’ D71D SCRMB scramble 

f 

DATA CD,89,D4,CD,81,D6,21,00,9B 
DATA CD,33,D7,21,00,B4,CD,33,D7 
DATA CD,69,D4,C9,01,00,18,CB,06 
DATA 23,0B,78,BI,20,F8,C9,++ 

' D73F SPX spiegel in x-as 

DATA CD,89,D4,CD,51,D4,11,00,9B 
DATA 21,07,B2,CD,5B,D7,11,00, B4 
DATA 21,07,CB,CD,5B,D7,CD, 69, D4 
DATA C9,3E,0C,F5,0E,20,C5, 06, 08 
DATA 7E,F5,IA,77,Fl,12,13, 2B, 10 
DATA F6,01,10,00,09,Cl,0D,AF,BI 
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625 

626 

627 

628 

629 

630 

631 

632 

633 

634 

635 

636 

637 

638 

639 

640 

641 

642 

643 

644 

645 

646 

647 

648 

649 

650 

651 

652 

653 

654 

655 

656 

657 

658 

659 

660 
661 
662 

663 

664 

665 

666 

667 

668 

669 

670 

671 

672 

673 

674 

675 

676 

677 

678 

679 

680 
681 
682 

683 

684 

685 

686 

687 

688 

689 

690 

691 

692 

693 

694 

695 

696 

697 

698 

699 


B f?A 20,E9,01,00, 02 ,AF.ED,42, F1 
DATA 3D,20,DC,C9, ++ 

; D7S2 SPY spiegel in y-as 

BAPA 39 , D4, CD, 51, D4,11,00 9B 

HATA ij’ ÏS’ 9B ’ 3E ’ 01 ’ 32,9E ' CE, CD 

DATA A7,D7,11,00,B4,21,F8,B4,AF 

DATA 32,9E,CE,CD,A7,D7,CD,69 D4 
BAPA C9 * 3E > lö .F5,0E,10,C5, 06, 08 
DATA ??’ S?’ ??’ D7> F5 ’ 1A ' CD ' D9 >D7 

BAPA 77 >PI * 12,13,23,10,F0,01 10 
DATA 00,AF,ED,42,Cl,0D,AF,BI 20 
BAp A El,01,80,00,EB,09,EB,09|09 

BA7A fc'Ei’o D ’ 30 •Dl,C9,F5,3A,9E 
? A I A CE, B7, 28,0D, F1, C5,06, 08, CB 

DATA C9’++’ 11 ’ 10 ’ FA » 79 .C1,C9,F1 


D7EF MTRX maatverdeling 


BA Ï A ^>2? , S 3 ,ED ’ 5 B ’ CB > F 3 » e 5,D5 
BA Ï A 2?’ 00 ' CD ’ 3 A 'D 8 , Dl, El, E5 
BA J A D5.01.0C, 17,CD,3A,D8,D1,E1 
BAPA B5 'D5,01,03,00,3E,03, CD, 1F 

BA I A D8 t Dl,El,01, FB ,00,3E,0C,CD 
P APA 1F, D 8 , C9,09, EB, 09, 06, 18, C 5 
BA J A 3 B) ^ D » 00 ' EB * F 5 .3E.F1,CD,4D 
DATA 00,Fl, 01 , 00 , 01 , 09 ,eb, 09,Cl 

BA I A 10 > EB > C9, ®9» EB, 09, 0E, 1F, 06 
BA I A 02 » 3E * 10 >CD,4D,00,23,EB,3E 
BA J A F1 1 CD, 4D, 00, 2 3 , EB, 10 , F 0 0Q 

data ^;è!;S' 10 - FC * 0D - 79 > B ^ 20 

D85D BMTRX besturing MTRX 

P A ï A 21 » 9F *CE,CB,7E,20,08,CB,FE 
BAPA CD, ef , D7, C3, AD, D9,7E, E 6 , 7F 

BA £ A JI'^ F ' 33 ' 10 > D8 > 32 . 1 A,D8,32 

?f- 3E - 0C *32,lA,D8 3E 10 32 
DATA 42,D8,C3,AD,D9,++ 

’ D 88 F LIWE 

t 

DATA CD,C0,00,21,9F,CE,CB, 46 
DATA 20,14,CB,C6,2A,B7,FC,22 
DATA A0,CE,2A,B9,FC,22,A2,CE 
DATA CD,20,01,C3,AD, D9, 7E, E 6 
DATA FE,77,3E,01,C3,26, D 0 ,++ 


D8B6 TRWGL driehoek 


DATA CD,C0,00,21,9F,CE,CB, 56 
DATA 20,14,CB,D6,2A,B7,FC,22 
P APA A8,CE,2 A,B9,FC,22,AA,CE 
BAPA CD,20,01,C3,AD,D9,CB,5E 
DATA 20,14,CB,DE,2A,B7,FC,22 
DATA AC,CE,2A,B9,FC,22,AE,CE 
DATA CD;20,01,C3,AD,D9,7E,E6 
BAPA E3 - 77 ' 2A ’ B7 - f C,22,B0,CE 
DATA 2A,B9,FC,22,B2,CE,3E,03 
DATA C3,26,D0,++ 

; D901 SQR rechthoek 

DATA CD,C0,00,21,9F,CE,CB,4E 

DATA 20,14,CB,CE,2A,B7,FC,22 
DATA A4,CE,2A,B9,FC,22,A6,CE 
BAPA C D,20,01,C3, AD,D9,7E,E6 
DATA FD, 77,3E,02,C3,26,D0,++ 

’ D928 CRCL cirkel 


700 BAPA CD,C 0 , 00 ,21,9F,CE,CB ,66 

701 DATA 20,14,CB,E6,2A,B7,FC 22 

702 DATA B4,CE,2A,B9 FC 22 B 6 CE 

703 DATA cd, 20, 01, C3, AD, D9,’7E,'E 6 

70 £ BA P A EF > 77,2A,B7,FC,22,B 8 ,CE 
703 P A Ï A 2A, b 9, FC, 22, BA, CE, 3E, 05 

706 DATA C3,26,D0 ++ 

707 ' 

709 ' D95B CR CLC cirkel correctie 

710 BA I A 64 ; * 100 standaard 

7DATA CD,C0,00,CD,9F,00,FE,31 
712 DATA 38,F9,FE,3A,30,F5,E6,0F 
Jl 3 BA J A 47,C6,18,10,FC,32,5B,D9 

714 DATA CD,C0,00,C 9 ,++ 

715 1 

716 ’ D978 PAINT 

717 » 

718 DATA 3E,04,C3,26,D0,++ 

719 ’ 

720 ' D97D 9FtSC hulproutine 

721 ’ 

722 DATA CD,56,01,CD,9F,00 

723 DATA CD,69,D4,C9,++ 

724 ’ 

726 ' 6937 ^AP^- hulproutine 

727 DATA 3A,82,CE,32,B5,FC,32,B9 

728 DATA FC,3A,83,CE,32,B3,FC,32 

729 DATA B7,FC,ED,4B,B3,FC,ED,5B 

730 DATA B5,FC,CD,11,01,C 9 , ++ 

732 ’ D9A5 SET hulproutine 

733 * 

734 DATA 3A, 8 B,CE,B 7 ,C 4 ,20, 01 ,C 9 ,++ 

736 ’ D9AD DLY wacht 

737 * 

738 DATA 21.00.A0 

739 DATA 23,7D,B4,C8,18,FA,++ 

740 ' 

742 ' 1)966 PRFCB voorbereiding FCB 

743 DATA 54,45,4B :'TEK 

744 DATA 2A,53,F3,AF,77,23,06,08,11 

745 DATA 00,CC,IA B7 28 05 7? 13 23 
BA P A l 0 * F7, 78; B7; 28, 11 , FE, 08,' 20 

7 4J DATA 07,3E,54,77,23,05,18,Fl|3E 
7 ^ 3 20 . 77, 23,10,FC,11,B6,D9,06 

lil DATA 03 > 1A * 77 >13.23,10.FA.06 19 
750 DATA AF,77,23,10,FC,C9,++ 

752 ’ D9F5 OPFL open file 

753 ’ ^ 

754 DATA 46,49,4C,45,20:• FILE 

755 DATA 4E,4F,54,20,46:’ MOT 

756 DATA 4F,55,4E,44, 00 :' FOUND 

757 DATA CD,7D,F3, B7, C 8 ,11,F5,D9 

758 DATA IA,B7,28,07,CD,01,D7,13 

739 23, 3-8, F5, 06,05, CD, AD, D9 

761 ? ATA 10 * FB > CD,69,D4,El,C9,++ 

762 • DA23 LSPR voorber. save/1oad 

(Do 1 

764 DATA 4C,4F,41,44,20,00: * SAVE 

7 65 DATA 53,41,56,45,20,00:'LOAD 

766 DATA 3A,2C,F9,F5,2A,2A,F9,E 5 2A 

767 DATA B3, FC, E5, 2A, B5, FC, E5, 2A ,* B7 

768 DATA FC,E5,2A,B9,FC,E 5 3A F 2 

769 DATA F5,2A, 9A, Ce! 22, B 7 ,’ FC 2A* 9C 

770 mï! CË, 22 , B 9, FC , IA, B7, 2ö’, 06j CD 

77 1 BAPA 01.D7,13,18,F6,11,00,CC,00 

772 DATA 00,00,00,00,CD,56,01,CD,9F 

773 BAPA 00 » FE,7F,28, 13,FE,0D,28,0F 

774 DATA FE,20,38,EE,FE,7F,30,EA,12 
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775 DATA 13,CD,01,D7,18,E3,47,AF,12 

776 DATA F1,32,F2,F3,El,22,B9,FC,El 

777 DATA 22,B7,FC,El,22,B5,FC,El,22 

778 DATA B3,FC,El,22,2A,F9,F1,32,2C 

779 DATA F9,C9,++ ’ 

780 • 

781 ' DAA6 SAVE 

782 ’ 

783 DATA 3E,40,32,9A,CE,3E,60,32,9C 

784 DATA CE,CD,51,D4,CD,D0,D4,11 29 

785 DATA DA,CD,2F,DA,78,FE,7F,20,07 

786 DATA CD, 69,D4,C9,47,50,56,3A,A7 

787 DATA FF,FE,C9,28,45,00 

788 * diskdrive- 

789 DATA CD,B9,D9,0E,16,ED,5B, 53, F3 
5 ATA CD >7D,F3,21,00,9B, CD, F5, DA 

791 DATA 21,00,B4,CD,F5,DA,0E, 10, ED 
11% 5f£ A 5B,53,F3,CD,7D,F3,CD,69,D4 

793 DATA C9,06,30,0E,IA,EB,C5,CD,7D 

794 DATA F3,EB,ED,5B,53,F3,0E, 15, E5 
BATA D5 >CD,7D,F3,Dl,El,01,80,00 

796 DATA 09,Cl,10,E4,C9 

797 * cassette- 

798 DATA CD,4F,DC,06,10,3E,EE,C5,CD 

799 DATA ED, 00, E3, E3, Cl , 10, F5, 11 , 00 

800 DATA CC,06,06,IA,B7,28,0A,D5,C5 

801 DATA CD,ED,00,Cl,Dl, 13, 10,F2,AF 

802 DATA B0,28,09,3E,20,C5,CD,ED,00 

803 DATA Cl,10,F7,CD,F0,00,21,00,9B- 

804 DATA CD,5E,DB,E3,E3,E3,E3,21,00 

805 DATA B4,CD,61,DB,CD,F0,00,CD,69 

806 DATA D4,C9,CD,4F,DC,01,00,18,7E 

807 DATA E5,C5,CD,ED,00,Cl,El,30,04 

808 DATA El,C3,5E,DC,23,0B,78,BI 20 

809 DATA EC,C9,++ 

810 * 

811 ’ DB79 LOAD 

812 • 

813 DATA 3E,40,32,9A,CE,3E,60,32,9C 

814 DATA CE,CD,51,D4,CD,D0,D4,11,23 

815 DATA DA,CD,2F,DA,78,FE,7F,20,07 

816 DATA CD,69,D4,C9,47,50,56,3A,A7 

817 DATA FF, FE,C9,28,45,00 

818 ’ diskdrive- 

819 DATA CD,B9,D9,0E,0F,ED,5B,53,F3 

820 DATA CD, 04,DA,21,00,9B,CD,C8,DB 

821 DATA 21,00,B4,CD,C8,DB,0E,10,ED 

822 DATA 5B, 53,F3, CD,7D,F3,CD,69,D4 

823 DATA C9,06,30,0E,IA,EB,C5,CD,7D 

824 DATA F3,EB,ED,5B,53,F3,0E, 14, E5 

825 DATA D5,CD,7D,F3,Dl,El,01,80,00 

826 DATA 09,Cl,10,E4,C9 

827 ’-cassette- 

828 DATA CD, 58,DC,06, 10,C5,CD,E4,00 

829 DATA Cl,FE,EE,20,F2,10,F5,11,10 

830 DATA CC, 06, 06, D5, C5, CD, E4,00, Cl 

831 DATA Dl, 12, 13, 10, F5, CD, E7,00, 11 

832 DATA 00, CC, 21, 10, CC, 06,'06, 1A, B7 

833 DATA 28, 07, BE, 20, CE, 13,23, 10, F5 

834 DATA 21,00,9B,CD,34,DC,E3,E3,E3 

835 DATA E3,21,00,B4,CD, 37,DC,CD,E7 

836 DATA 00,CD,69,D4,C9,CD,58,DC,01 

837 DATA 00, 18, E5 ,,C5, CD, E4,00, Cl, El 

838 DATA 77,30,04,El,C3,5E,DC,23,0B 

839 DATA 78,BI,20,EC,C9,E5,CD,EA,00 

840 DATA El,D0,C3,5E,DC,E5,CD,El,00 

841 DATA El,D0,21,10,D0,E3,CD,69,D4 
34§ ? ATA 3 E > ff .CD,F3,00,C3, AD,D9,++ 

844 ’ DC6D MAINPR hoofdrout.print 

845 ’ ^ 

846 DATA 21,78,DC,22,CD,FD,3E,CD,32 

847 DATA CC,FD,FE,33,20,05,F5,3E,0E 

848 DATA 18,06,FE,32,C0,F5,3E,0F,32 

849 DATA 7E,DD,3A,AF,FC,FE,02,28,02 

850 DATA Fl, C9, E5, D5, C5, ED, 73, 40, DE 


851 

852 

853 

854 

855 

856 

857 

858 

859 

860 
861 
862 

863 

864 

865 

866 

867 

868 

869 

870 

871 

872 

873 

874 

875 

876 

877 

878 

879 

880 
881 
882 

883 

884 

885 

886 

887 

888 

889 

890 

891 

892 

893 

894 

895 

896 
++ 

897 

898 

899 

900 

901 

902 

903 

904 

905 

906 

907 

908 

909 

910 

911 

912 

913 

914 

915 

916 

917 

918 

919 

920 

921 

922 

923 

924 


DATA 31,40,DE,CD,6D,DD,0E,18,CD 
DATA 9B,DD,CD,8C,DD,06,20,CD,C9 
DATA DC,CD,D9,DC,CD,05,DD,CD,42 
DATA DD,10,F2,CD,64,DD,0D, 79, B7 
DATA 20,E5,ED,7B,40,DE,Cl, Dl, El 
DATA Fl,C9,++ 

I 

’ DCC9 PRBUF prepair buffers 

DATA C5,01,3F,00,11,BI,CF,21 
DATA B0,CF,36,00,ED,B0,Cl,C9,++ 

' DCD9 GETBY haal bytes op 

DATA C5,3E,18,91,57,3E,20,90 
DATA CB,27,CB,27,CB,27,5F,2A 
DATA CB,F3,19,D5,01,08,00,11 
DATA F0,CF,C5,CD,59,00,Cl,Dl 
DATA 2A,C9,F3,19,11,F8,CF,CD 
DATA 59,00,Cl,C9,++ 

’ DD05 FIBUF vul buffer 
♦ 

DATA C5,11,B0,CF,21,F0,CF,DD,21 
DATA F8,CF,0E,08,06,08,CB,7E,28 
DATA 23,DD,7E,00,E6,F0,CB,3F,CB 
DATA 3F,CB,3F,CB,3F,FE,08,38,03 
DATA 3E,01,12,CB,06,13,10,E3,23 
DATA DD,23,0D,79,B7,20,D9, Cl, C9 
DATA DD,7E,00,E6,0F,18,E3,++ 

’ DD42 EMBUF leeg buffer 

DATA C5,11,F8,FF,21,E8,CF,0E,08 
DATA E5,AF,06,08,86,CB,27,F5,19 
DATA Fl,10,F8,1F,CD,76,DD,El,23 
DATA 0D,79,B7,20,E9,C1,C9,++ 

’ DD64 EMPRB leeg printerbuffer 

DATA C5, 11,82, DD, 06, 03 
DATA C3,92,DD,++ 

I 

DD6D INPRL init. regelafstand 
DATA 06,04, 11,7E,DD,C5,C3,92,DD, 


’ DD76 PRUT print 

DATA CD, A5, 00, D0, C3, C0, DC, C9,++ 

' DD7E printer mode' s 

DATA 0F,1B,42,0D,0D,0A,0D 
DATA 1B,53,30,32,35, 36, 0D,++ 

DD8C INPRG init.grafisch print 

DATA C5,11,85,DD,06,06,IA,CD 
DATA 76,DD,13,10,F9,Cl,C9,++ 

| DD9B MAIJÏPR2 hoofd vergr. print 

DATA 3A,7E,DD,FE,0F,C8,El,CD,8C 
DATA DD,06,20,CD,C9,DC,CD,D9,DC 
DATA CD,05,DD,21,C8,CF,CD, DC, DD 
DATA 10,EF,CD,64,DD,CD,8C, DD, 06 
DATA 20,CD,C9,DC,CD,D9,DC, CD, 05 
DATA DD,21,E8,CF,CD,DC,DD,10,EF 
DATA CD,64,DD,0D,79,B7,20,C9,C3 
DATA C0,DC,++ 

I 

' DDDC EMBUF2 leeg buffer 2 


28 















925 DATA C5, 11, F8, FF, 0E 08 E5 at? 

11? Siïl S:5S:gg;S?:ii*5g : ^S : S? 
111 SJ?1 


DRAW (o) VERSCOM 1987 


itt: at 

•3 wis, aan 
:i wi$. uit 
F5 Raint 
> snelIar 
< trager 
s sera 



-ïjn 

r vierhoek 
x spiegel x 
v verdeling 



help 
motor 

cirfcel'cor. 
driehoek 
tekst 
spiegel y 


BE in memory 

ph 

T »oWS, 8 > 

BEEF EEN TOETS 


MSX-GIDS 

BEWAARBANDEN 

Voor de MSX Gids zijn nu ook opbergmappen 
verkrijgbaar. Deze bewaarbanden zijn - uiter¬ 
aard - geel en hebben het MSX-Gids logo 
(in zwarte opdruk) op de voorzijde en op de rug. 
In deze mappen kunnen minstens 6 exemplaren 
van de Gids opgeborgen worden. De bladen 
worden in de map vastgezet met speciale 
(bijgeleverde) metalen klemmen. Hierbij wordt 
het blad niet beschadigd! De mappen worden 
geleverd in een bijbehorende verzenddoos en 
de prijs van deze bewaarband is ƒ 19,95 per 
stuk. Deze prijs is inclusief BTW en verzend¬ 
kosten. 

De banden zijn te bestellen door overmaking 
van ƒ 19,95 per stuk op Postbanknummer: 
5036011 t.n.v. J. Herps te Lelystad onder ver¬ 
melding van ’bewaarband’. 

Voor België is dit Bfr. 365 op bankrekening 
235-0430464-87 bij de Generale Bank te 
Hasselt t.n.v. J. Herps, Postbus 516, 
8200 AM Lelystad onder vermelding van ’be¬ 
waarband’. 


COMPUTER EN BESTANDEN 

Als de hoeveelheid gegevens te groot wordt on te 
onthouden of om vast te leggen in bijvoorbeeld een 
agenda of in een situatie, waarin de gegevens door 
meer personen geraadpleegd moeten worden, is het 
raadzaam te denken aan het gebruik van 
bestanden. Wanneer we de Juiste middelen (een com- 

E uterl bezitten, dan kunnen we met computer- 
estanden sneller werken dan handmatig bilhouden 
op papier. ° J 

Gegevens blijken in de praktijk heel vaak gewijzigd 
te moeten worden. Denk maar eens aan de verhui¬ 
zingen van de abonnees van de MSH-gids. Dit zou op 
papier een lijst betekenen met steeds meer 
verbeteringen en doorhalingen, waardoor de lijst 
onleesbaar en onbruikbaar wordt. Een computer¬ 
bestand is te wijzigen en daarna kan het bestand 
weer up-to-date uitgeprint of op beeldscherm 
getoond worden. Nog een reden kan zijn de 
mogelijkheid het bestand te sorteren (bijv. op 
postcode, op woonplaats of naam enz.) en selekties 
toe te passen. Bijvoorbeeld alleen de leden van een 
vereniging die achterstand hebben bij het betalen 
van de contributie of alle leden uit Amsterdam. 

WAARUIT BESTAAT EEN BESTAND ? 

Een bestand bestaat uit een aantal records. Een 
record is een verzameling van velden. Een leden¬ 
bestand kan bestaan uit records met de volgende 
velden: lidnummer, naam, straat, postcode Bn 
woonplaats. Deze 5 velden vormen samen een record 
en horen bij elkaar. 

De velden kunnen een vaste lengte hebben, 
waardoor de recordlengte vaststaat. Bij vaste veld- 
lengte van de naam (25 pos.) kunnen niet meer dan 
25 posities ingevoerd worden en hetgeen minder 
ingevoerd wordt, wordt aangevuld met spaties, 
waardoor alle 25 posities weer gebruikt worden. 

Variabele veld- en recordlengte is ook mogelijk. In 
dit geval nemen de afzonderlijke velden uitsluitend 
die ruimte in, die werkelijk nodig is. Tussen de 
velden worden dan scheidingstekens geplaatst. Deze 
tekens mogen niet voorkomen in de te gebruiken 
velden. Een andere methode om velden te scheiden 
is het gebruik van lengte-indicaties. Deze veldjes 
geven de lengte aan van het daarop volgende veld 
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Variabie recordlengte met scheidingstekens. 
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Variabie recordlengte met lengte-indicaties. 




























RAADPLEGEN VAN BESTANDEN 

De ophouw wan je record kun je zelf bepalen, maar 
je moet wel rekening houden met het soort bestand 
van je keuze en de capaciteit van je apparatuur 
en interne geheugen. De manier waarop je een 
bestand kunt benaderen hangt af van de wijze 
waarop een bestand is opgebouwd en op welk 
medium het opgeslagen is (bijv. floppg-disk of mag¬ 
neetband) Dit noemen we ook wel het externe 
geheugen. 

Twee manieren waarop je een bestand zou kunnen 
raadplegen zijn lineair en binair zoeken. Lineair 
(sequentieel) zoeken houdt in, dat de gegevens stuk 
voor stuk onderzocht worden of ze gelijk zijn aan 
het te zoeken gegeven. Bijvoorbeeld een rij 
oplopende getallen : 

1-2-3-6-7-8-9-11-12-15-17-18-20 

De opdracht is: zoek getal 11. 

Bij lineair zoeken vergelijkt het programma steeds 
het eerstvolgende getal en wanneer dat niet gelijk 
is aan 11, dan wordt de volgende gelezen. 

Binair (random) zoeken is een methode waarbij het 
gedeelte, waarin het gegeven kan voorkomen, steeds 
in 2 dalen wordt opgesplitst. 

Opdracht: zoek getal 15 

1-2-3-5-6-8-9-10 12-13-15-17-18-20-23-24 

Het getal is groter dan 12 

12-13-15-17 18-20-23-24 

Het getal is kleiner dan 18 

12-13 15-17 

Het getal is groter dan 13 en bevindt zich in het 
tweede groepje. 

Bestanden kun Je geheel of gedeeltelijk in het 
interne geheugen laden en er dan mee gaan werken. 
Je kunt het bestand ook op het externe geheugen 
laten staan en alleen dat deel inladen wat je nodig 
hebt. Een snelle methode van bestandsbenadering is 
het bestand geheel in het interne geheugen 
plaatsen, want zoeken in het interne geheugen gaat 
sneller dan in het externe geheugen. Voorwaarde is 
wel dat er genoeg werkruimte overblijft. 

KEUZE VAN HET SOORT BESTAND 
Het voornaamste overwegingspunt is wel waar het 
bestand voor gebruikt gaat worden: zijn er veel of 
weinig gegevens? Worden de gegevens willekeurig of 
in volgorde gebruikt? Moeten de wijzigingen direkt 
doorgevoerd worden of mag dit in batch verwerking 
(verzamelen van wijzigingen)? En wordt de batch in 
dezelfde volgorde aangeleverd als, het bestand? 

Het zoeken gebeurt met behulp van een keg ofwel 
sleutel. Deze keg is een codenaam/ nummer die op 
unieke wijze voorkomt in het bestand. De keg geeft 
toegang tot een bepaald record in het bestand en 
maakt net mogelijk te werken met de inhoud van 
de velden van het bewuste record. Wanneer er in 
een ledenbestand veel namen voorkomen, dan wordt 
er al snel gekozen voor het koppelen van alle 
namen aan een eigen nummer. Er kan nu gezocht 
worden op nummer. Als het goed is zijn deze altijd 
uniek. In een ledenbestand kunnen dezelfde namen 


voorkomen, die echter verschillende leden vertegen¬ 
woordigen. Geef je elk lid een eigen uniek nummer, 
dan zijn er geen problemen. 

SOORTEN BESTANDEN 

De meest voorkomende soorten bestanden ziln • 

- sequentiele bestanden 

- random bestanden 

- index sequentiele bestanden 

De eerste twee worden het meest gebruikt op 
MSX-computers. De laatste wordt meer gebruikt od 
grotere systemen. a p 

Sequentieel bestand : 

Dit is een bestandsstruRtuur waarbij de records 
alleen op volgorde te benaderen zijn. Deze bestan¬ 
den staan meestal op magneetband, maar kunnen 
ook op disk staan. Wijzigen op het bestand gebeurt 
meestal in batchverwerking. Deze batch moet op de¬ 
zelfde volgorde liggen als het bestand. Je kunt 
deze bestanden vergelijken met een muziekcassette. 
Als je daarvan het derde liedje wilt horen, moet je 
ook de eerste twee voorbij. Spoelen of luisteren, ie 
moet er langs. J 

Random (direkt bestand) bestand: 

Alle gegevens zijn direkt te benaderen. Het bestand 
staat in de regel op schijf. Als het bestand niet 
groter wordt dan het interne werkgeheugen, kan 
net ook op band opgeslagen worden en moet het 
eerst ingeladen worden. Je zou dit bestand kunnen 
vergelijken met een elpee. Je kunt de naald op eBn 
willekeurige plaats op de plaat zetten en je hoeft 
niet eerst de voorafgaande nummers af te spelen. 

Index-sequentiele bestanden : 

We hebben hier te maken met een direkt toeganke- 
ïjke bestandsstruktuur, waarbij de records op wil¬ 
lekeurige plaatsen staan, maar hun sleutels in 
volgorde zijn geplaatst in een tabel (indax). Achter 
elke keg (sleutel) staat het werkelijke adres van 
het record in het bestand. 


INDEX 

TABEL 

0 

9 

1 

36 

2 


enz 



index sequentieel bestand 



De index fungeert dus ais een soort ruitertje in 
een kaartenbak. Je kunt in een oogopslag zien waar 
het gegeven zich bevindt. 

Wellicht kunnen we in een volgend artikel wat 
dieper ingaan op de verschillende vormen van be¬ 
standen. 

Ina Stam 
Aad van Leeuwen 

















RECURSIE IN BASIC 

Hat Is recursie? 

Kort en krachtig gezegd: recursie zien we optreden 
wanneer een onderdeel van een structuur gelijk is 
aan het beeld van de structuur als geheel. Een llas- 

SLvnr»H 0r 5 e “ d A 00r de , 0Uderen 0nder 0ns?) wordt 

gevormd door de verpleegster op de bus Droste 

cacao, die een dienblad vasthoudt met daarop de bus 
Z os iï cacao >waarop dezelfde verpleegster welke een 
dienblad vasthoudt... etc. In de praktijk stopt de 
recursie hier, wanneer de grens van het oplossend 
vermogen van de afbeeldingstechniek bereikt is. 

in aa nflcir r< ! t 9 adacht > d ? t recursie in Pascal wel, maar 
in Dflblt in het geheel niet mogeliik zou zijn. Dit is 
zeker niet waar. J 

Hoe moeten we ons recursie in een programmeertaal 
precies voorstellen? He spreken in dit geval van 
recursie, wanneer een procedure (of in het geval van 
Basic een subroutine) zichzelf aanroept. 

Voor een juist begrip van het volgende is het nodig 
dat we eerst goed doorzién wat er precies qebeurt 
wanneer we in BASIC een GOSUB-opdracht geven. Stel 
dat we het volgende programmaatje hebben; 

10 PRINT "Dit is het hoofdprogramma." 

20 GOSUB 100 

40 END* 7 " Dit iS HBer hBt hoofd P ro 8 ramma " 

100 PRINT "(Dit is de subroutine)" 

110 RETURN 

Hoog in het geheugen bevindt zich de Basic- stapel 
ide stack). Als de verwerking van het BASIC- pro¬ 
gramma tot regel 20 gevorderd is, wordt er a.h.w. uit 
de normale programmavolgorde gesprongen: nu eerst 
naar 100, dan weer naar 30. Hoe onthoudt BASIC nu 

™n? b "ÏFTr?5L- 110 *T r naar 30 mDet worden Bespron¬ 
gen? RETURN zonder meer is niet zo duidelijk! 

Ietwat versimpeld gezegd: zodra bij regel 20 het 
hoofdprogramma wordt verlaten, zet BASIC het 
nummer .van de eerstvolgende opdracht in dat hoofd¬ 
programma op de stapel (in dit geval dus "30"). Bil de 
eerstvolgende RETURN (r. 110) wordt dat adres door 

- . i? t u. r . P ? t S r n WMr van de 8tfl P el gehaald en wat 
ziet hij dan? Precies: "30"! 

De stack kan (als een stapel borden) meerdere terua- 
keernummers bevatten. Zoiets komt dus voor als een 
subroutine weer een sub- subroutine bevat. Het 
terugkeeradres uit de sub- subroutine staat dus (als 
laatste neergelegde") bovenop de stapel en wordt er 
weer als eerste afgehaald, zodat naar de subroutine 
wordt teruggekeerd. Aan het eind van die subroutine 
wordt het terugkeeradres naar het hoofdprogramma 
(dat was als eerste neergelegd) afgepakt, zodat weer 
gozien wordt waar precies in het hoofdprogramma 
verdergegaan moet worden. De stapel heeft dus, zoals 
dat heet, een UFO- constructie: last in, first out. In 
beeld gebracht aldus: 


301 


110 


30 


Fig.1 


(popi10) 

I 30| (pop30) 


r20 rl00 rl010 rl20 r.30 


10 PRIFP’Dit is het hoofdprogramma" 
20 GOSUB 100 , r 


30 


3® ££IHT”Dit is weer het hoofdpr.” 

40 END r _ 

100 GOSUB 1000 110 j 


110 PRINT”Subroutine” 

120 RETURN 

1000 PRINT”Subsubroutine" 
1010 RETURN 


30 


(pop 30) 
(popli0) 


30 | 


Om aan te geven dat een terugkeerregelnummer van 
de stapel is gepakt, wordt hier de Amerikaanse uit- 
£““‘“8 to pop" (* afpakken) gebruikt. (In werke¬ 
lijkheid groeit de stapel niet als een stalagmiet naar 
boven, maar groeit hy van hoog in het geheugen als 
een stalactiet naar beneden. Voor het principe maakt 
dit echter niets uit). 

Als het: programma in de dynamische (d.w.z. de 
werkelyk afgelegde) volgorde doorlopen, dan zien we 
de stapel dus de volgende hoedanigheden aannemen 
(fig. 1) . 

Het zal duidelijk zyn, dat een subroutine die zichzelf 
steeds blijft aanroepen, in een eindeloze lus een 
trieste dood sterft. Probeer maar eens: 

10 GOSUB 10 

Doordat steeds regelnummer "10" op de stack wordt 
gepushed, groeit deze in rap tempo het gehele 
geheugen in, zodat een "Out of memoru" on het 
scherm verschynt . Er is immers geen RETURN die 
weer eens iets van de stapel haalt... 

In het eerste boekje dat A.C.J. Groeneveld in de 
bekende reeks MSH Truuks en Tips" (uitg. Stark 
Texel) schreef, komt een intrigerende subroutine voor 

facu,tBlt van 8 «» getal te berekenen. (De 
faculteit van een getal is zyn "vermenigvuldiging 

SS'iSr' dUS blJV ' 51 ' 20 schr U f J* nat - 9 Is® 


In zijn oorspronkelijke vorm luidt de routine voor de 
faculteit van een getal N: 

1000 IF N>0 THEN N*N-1:G0SUB 1000: N’N+1: 

F«F»N: RETURN ELSE F*l: RETURN 

In F krijgen we dan NI, maar als je de werking van 
de routine probeert te volgen loop je vast. Groene¬ 
veld schrijft inderdaad terecht: “doe deze routine 
werkt, zal velen een raadsel blijven." (Sommigen 
menen dan ook dat het woord "recursie" is afgeleid 
van het Engelse woord voor vloek: "curse", maar of 
dit zo is, weet ik niet). 

Omdat we hier met een fraai voorbeeld van recursie 
te maken hebben, loont het de moeite deze kwestie 
toch eens nader te bekijken. 

Duidelijker wordt het al, wanneer we i.p.v. de dubbele 
punten aparte regelnummers gebruiken: 
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10 INPUT N 
20 GOSUB 1000 

30 PRINT "De faculteit van";N;" is H ;F 
40 END 

1000 IF N>0 THEN 1010 ELSE 1100 
1010 N-N-l 
1020 GOSUB 1000 
1030 N-N+l 
1040 F*F#N 
1050 RETURN 
1100 F«1 
1110 RETURN 

Laten we nu eens voor N de waarde 5 invoeren (we 
drie'dingen” tr8 ^ enen ®** a ^ !ï * * en ^ an dijken naar 

1. de stack, 

2. het waardeverloop van N, 

3. het waardeverloop van F. 

We zien dan het beeld zoals aangegeven in fig. 2. 
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Het merkwaardige is dat N eerst wordt verminderd 
tot O. Zijn we nu de waarde van het getal waarvan 
do faculteit moet worden bepaald, kwijt? Ja, maar... 
zijn waarde is behouden in de stack (als N tot 0 
gereduceerd is, heeft de subroutine zichzelf precies 
5 keer aangeroepenl Dan wordt niet meer voldaan 
aan de voorwaarde N>0 (r. 1000), dus gaan we naar 
U00, en klauteren we via herhaalde RETURNs terug 
uit het dal van de recursie (vijf maal wordt reoel- 
nummer 1030 van de stapel gepopt). Iedere keer 
wordt N met 1 verhoogd , en met N wordt F vermenio- 
vuldigd). a 

F, eerst gelijk aan 1. wordt aanvankelijk vermenia- 
vuldigd mot 1. Dit produkt wordt daarna vennenig- 
vuldigd met N+l, dus met 2. Dit produkt (2) wordt 
inadat N met 1 opgehoogd ie), 3 keer genomen. In 
wezen zien we dus de vermenigvuldiging 1#2» 3«4#5 
en dat is uiteraard ook N-faculteit... Wanneer terug- 
keeradres "30" van de stapel is gepopt, komen we uit 
DIJ fiBt einde van het programma en stopt het 
vermenigvuldigen netjes bij de eindwaarde van N»5 
(welke waarde hij ook in het begin had). 


We zien dus dat Groeneveld op een zeer doelmatige 
wijze van recursie gebruik heeft weten te maken. (In 
hetzelfde boekje zien we dit in het programmaatje 
Talstelselconversie". Wat dat betreft is het jammer 
dat andere schrijvers de reeks tegenwoordig hebben 
overgenomen, want steeds weer valt de compactheid 
en doelmatigheid van zijn programma’s op). 

8 8 
8 

Wie meer over recursie wil weten, komt onvermijde¬ 
lijk uit bij een merkwaardig boek van Douglas R. 
Hofstadter: "Goedel, Escher, Bach: een eeuwig gouden 
band" (Uitgave Contact, Amsterdam). 

In dit maar liefst 900 bladzijden dikke boek 
beschrijft de Amerikaanse metawiskundige (met -zeer 
brede- belangstelling) Hofstadter, hoe hij in het 
werk van de Nederlandse graficus Escher, de Duitse 
wiskundige Goedel en de componist Bach eenzelfde 
grondpatroon ontwaart: dat van de recursie. Het is 
geen boek dat iedereen volledig zal begrijpen (onder¬ 
getekende met zijn toch beperkte geestelijke 
vermogens zeker niet), maar niettemin is het een 
werk dat je ondanks zijn welhaast bijbelse dikte in 
een ruk zou willen uitlezen. 

Hofstadter is gefascineerd door de schoonheid van 
de wetten die de getallenleer ontdekt. Hij meent dan 
ook dat wiskundigen hun vak vooral om esthetische 
redenen uitoefenen. Zo’n wet kan worden uitgebeeld 
in een grafiek, en in hoofdstuk V laat hij een paar 
inderdaad frappante voorbeelden daarvan zien. Om 
een beetje de sfeer van het boek te tgperen: als hij 
ons een recursieve grafiek (denk aan de Droste- 
verpleegsterD van "energiebanden voor elektronen in 
een kristal toont, vertelt hij dat een min of meer 
ongelovige vriend van hem, dit ziende, het een 
portret van God" noemde. 

Dat het boek Ie blijft boeien, komt voornamelijk 
doordat Hofstadter een man van grote belezenheid 
is, die niet de hinderlijke gewoonte heeft om dat in 
zijn boek door middel van ontelbare voetnoten in de 
tekst nog eens extra duidelijk te mak en. Het leuke 
is daarbij, dat hij menig voorbeeld uit het dagelijks 
leven aanhaalt om dat als opstapje te gebruiken 
naar een theoretischer model. En een groot verschil 
met Nederlandse of Duitse wetenschappelijke c.q. 
leerboeken is. dat de humor niet geschuwd wordt. 

Waarom is bij ons dit soort boeken toch altijd zo 
gruwelijk gortdroog? (Is het iemand die de 
iSn-versie van Hisoft Pascal bezit, trouwens wel 
eens opgevallen dat daar in de Engelse handleiding 
aan de seksuele aberraties van Lewis Carroll wordt 
gerefereerd?). Doordat ieder hoofdstuk begint met 
een merkwaardig toneelspel , en het boek door Ronald 
Jonkers uitstekend vernederlandst is ("vertaald" is 
te zwak uitgedrukt), houdt "Goedel, Escher, Bach: een 
eeuwig gouden band" je aandacht, ondanks de 
moeilijke materie, toch steeds vast. Een aanrader 
dus. 

A.Stam 
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EEN TEKSTUTILITY 
VOOR 

HISOFT-PASCAL 


kIkk 6t Hisoft " Pascal hoeft gewerkt, zal zich vaak 
bben , 9 ea rgerd aan de gebruiksonvriendelijke 
edit o r, die daarbij wordt geleverd: ED80. In feite 
netreft het hier een oerversie van (een deel van) 
Wordstar, nog geschreven voor CP/M en zonder 

5ïnr°lii e8tUr ‘ n9, **? 20U het toch fi J n zi Jn. al» «e 

van d.“SsiC-. r d!’t C °rl“ 8ebr ““‘ “ 0ni ' en “° k ' n 

De onderstaande utilitu maakt dat mogelijk. Je 
maakt gewoon onder BASIC een Pascal-sourcecode aan 
Cmet regelnummers en al). Zorg wel dat iedere regel 
mot een apostrof (’) begint. 

Schrijf de tekst dan weg naar disk met 

save "filenaam",a 

*° dat f ? Bn ^ SCII-flle ° nt »tMt (hetzelfde als wat 
tuüll doet, alleen nog wel voorzien van regel¬ 
nummers). a 

Run n “ pa |CALED.BAS, geef de naam van het zojuist 
gemaakte ASCII- bestand op en daarna de gewenste 
naam van de Pascal-sourcecode (met extensie .PASO 
en... klaar is Kees! Onder MSH-DOS kan dan met 
behulp van 

TYPE filenaam.PAS 

de verkregen file gecontroleerd worden. 

In de recursieve subroutine van regel 1000-1050 
worden de regelnummers verwijderd. 

jfl ve /' dlent wellicht aanbeveling (daar er met twee 
disk- bestanden wordt gewerkt) de error- routine 
van deze utilitg zelf nog wat uit te breiden. 

A. STAM 

10 1 Programma PASCALED.BAS - A. Stam. Di 
programma haait de regelnummers uit een 
ais AbCII-file weggeschreven BASIC- progra 

20 CLS:VIDTH 40:MAXFILES=2 
25 ON ERROR GOTO 3000 
30 INPUT "Naam ASCII— bestand” : AS$ 

40 PRINT "Gewenste naam PASCAL-source-code 


”; PA$ 


?»i 

50 INPUT ” 

60 OPEN AS$ AS #1 LEN=1 
70 FIELD #1, 1 AS HE$ 

80 GET #1,1: IF ASC(HE$)=&HFE OR ASC(HE$)= 
&HFF TIIEN CLOSE :BEEP: PR INT: PR INT "Geen ASC 
I I-f ile! ’’: PRINT: PRINT: END 
90 CLOSE 

100 OPEN AS$ FOR INPUT AS #1 
110 OPEN PA$ FOR OUTPUT AS #2 
120 LINE INPUT #1, A$ 

130 GOSUB 1000 

140 IF AP$="nee" THEN BEEP:CLOSE:CLS:PRINT 
Bestand " ;PA$;" niet gevormd : PRINT "g 
en? ^? T °f t £ of S ev °nden in regel ";LEFT$(A$7 
SP):KILL PA$:PRINT:PRINT:END 
150 GOSUB 2000 


160 IF AP$="nee” THEN 140 
170 A$=RIGHT$(A$,LEN(A$>-(X+l)) 

180 PRINT #2, A$ 

190 CLOSE 

200 PR INT .-PRINT .-PRINT " öLMWW’-P 

RINT:PRINT: END A ^ H ,P 

1000 GOSUB 2000 

1010 IF AP$=”nee" THEN RETURN 

1020 A$=RIGHT$(A$,LEN<A$>-<X+1)) 

1030 PRINT #2, A$ 

1040 LINE INPUT #1, A$ 

1050 IF NOT EOF(1) THEN GOSUB 1000 
1060 RETURN 
2000 AP$="nee” 

2010 FOR X=2 TO 6 

2 ?c 0 wTn<b!L M i? $(A$ ’ X ’ 1>=CHR$<32> THEÏ SP=X 
• IF MID$(A$,SP+1, DOCHRS(39) THEN 

RETURN ELSE AP$=" ja":RETURN 
2030 NEXT X 
2040 RETURN 

3000 IF ERL=80 AND ERR=55 THEN PRINT: PRINT 
.-CLOSE: BEEP: PRÏNT "Bestand "; AS$bestaat 
niet. :PRINT:PRINT: KILL AS$:END 
3010 CLOSE:ON ERROR GOTO 0 


Bekenen op de MSB 
kan nog eenvoudiger. 

Ivo Temmink uit Haaksbergen stuurde ons een brief 
waarin hij terecht opmerkte dat de kapitaal- 
berekening (pag. 89 van Gids nr. 14) op een 
eenvoudiger manier kan worden benaderd door 
gebruik te maken van de INT (integer-) functie. 
Vanaf regel 100 wordt het betreffende programma 


100 A=100:J=0;N=2 

110 A=A*1.08:J=J+1 

120 A=INT(10"N*A+. 5)/10 / 'N 
130 'REGELS 130-160 VERVALLEN 
170 IF A>1000 THEN 190 
180 GOTO 110 

200 PRINT”n^h^?^ r ^ afronding" 
&OW FKINT'gd hele centen: ”: PRUTT ° 

111 pwn^ T " na ”J'^aren FL"A 
220 E KD 


In regel 180 wordt het kapitaal dan 'echt' afgerond 
op N cijfers achter de doe. punt (H=8). Door bij het 
af te ronden getal .5 op te tellen wordt een echte 
inne “ fr 5 nd ‘ n 8 verkregen. De uitkomst is nu Fl. 
1006,25. Zouden we de factor .5 laten vervallen dan 
worden de waarden naar beneden afgerond (zoals ook 
in mijn voorbeeld met de STRING- functies) en 
vinden we weer: Fl. 1005,69. 

Om in banktermen te blijven: Het is prettig te 
ervaren dat er "iemand met ons meedenkt". 

Eigenlijk was dit rekenvoorbeeld voornamelijk bedoeld 

“ VOOrb 'rTn B L t0 9 evan van de toepassing 

van de diverse STRING- functies. Hopenlijk ben ik 
daar desondanks toch in geslaagd. 

Ger. 
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REKENEN OP DE MSX 

DEEL 5 


CIRKELOPPERVLAK. BOLINHOUD, BOLOPPERVLAK 
In deel 2 hebben we met de MSB pi berekend en 
daarbij bevonden dat de geleerden het vroeger goed 
hadden gedaan. Er zijn nog veel meer formules, 

waarin factoren voorkomen, welke vroeger wel eens 
door iemand zijn berekend of uitgezocht en welke we 
nu nog steeds toepassen. In dit deel zullen we de 
volgende formules eens op hun juistheid controleren: 

Cirkelopparvlak ■ pi KR *2 

Bolinhoud * 4/3KpiKR*3 

Bol oppervlak ■ 4KpiKR*2 

Natuurlijk hoeven we niet te twijfelen aan de 
juistheid van deze formules. Het is echter leerzaam 
om met wat 'ruimtelijk’ inzicht en de hulp van de 
Man eens te trachten om op onze eigen manier deze 
formules af te leiden. 

CIRKELOPPERVLAK 

Uitgaande van de wetenschap dat de oppervlakte van 
een driehoek gelijk is aan basis maal halve hoogte 
(0pp.“Bxl/2H) is hot vrij simpel om de formule voor 
het cirkeloppervlak af te leiden. Maar eerst willen 
we dan wel bekijken of die formule juist is. Hoewel 
met behulp van enkele meetkundige stellingen de 
juistheid gemakkelijk te bewijzen valt, willen we het 
nu eens anders doen. 

Als we de driehoek opdelen in een groot aantal 
rechthoeken, zoals aangegeven in fig. 1, dan kunnen 
we zo zien dat de totale oppervlakte van die 
rechthoeken de oppervlakte van de driehoek goed zal 
benaderen. Maken we het aantal rechthoeken 
oneindig groot dan zal uiteindelijk de vertanding zo 
klein worden dat ze volledig samenvalt met de benen 
van de driehoek. Me zullen onze berekening baseren 
op 1000 rechthoeken. Voor de n-de rechthoek is de 
opp. gelijk aan Bn»h (zie fig. 1), Stellen we nu B en H 
op 1 dan komt ons rekenprogramma er als volgt uit 
te zien: 

10 FOR N*.3 TO 999. Si’1000 RECHTHOEKEN 
20 A«A+N/10* éi ’BEREK. +SOM OPPERVLAKTEN 
30 NEXT 

40 PRINT"Opp. driahoak-BK"A"KH" 

50 end 

Regel 20 geeft na "+" een vereenvoudiging van de 
formule: B«N/1000(is Bn) maal H/1000, waarbij dus B 
* n H beiden op 1 zyn gesteld. De uitkomst is dan: 
BB.5BH(regel 40). 

Slimmerikken onder u zullen misschien zeggen: “Deze 
berekening had even goed gekund met slechts 1 
rechthoek. In principe is dat wel zo, doch dan zou ik 
wel moeten bewijzen dat de in- en uitwendige tanden 
eikaars evenbeeld zijn en dat is nu juist niet de 
bedoeling. 

Maar nu weer terug naar de cirkel (zie fig. 2). 
Wanneer we het gehele cirkeloppervlak opdelen in een 
zeer groot aantal driehoeken, gelijk we een taart op 
zouden delen als we (te) veel gasten hebben, dan zal 
de oppervlakte van al die driehoely'es gelyk znn aan 
de som van alle basissen maal de halve hoogte. 
Oftewel: omtrek van de cirkel maal halve straal. 

- 2KpiKRK1/2R ■ piKR*2 

De formule voor het cirkeloppervlak klopt dus. 


BOLINHOUD 

Bij dit probleem gaan we de bovenste helft van de bol 
in een groot aantal schaven opdelen en dan daar 
van, etuk voor stuk, de inhoud berekenen en somme¬ 
ren. Als we de uitkomst dan met 2 vermenigvuldigen, 
vinden we de totale inhoud van de bol. Immers, 2 
halve bollen vormen samen 1 geheel. Delen we nu de 
bovenste helft weer op in 1000 schijven (zie fig. 2) 
dan is ds inhoud van de n-de schyf gelijk aan: 

pi KRn* 2Kh 

Hiarin is Rn* 2 gal ijk aan 
R*2-( RXn/1000)*2. 

Da gahala formula wordt dam 
Opp. «piKR*2X( l-( n/1000) *2K( 1/1000) KR 
■pi KR* 3K( 1 -( n/1000) ‘2K1/1000 

In ons rekenprogramma halen we pi en R* 3 eruit 
door beiden op 1 te stellen: 

10 FOR N*. 3 TO 999.3 i ’ 1 000 SCHIJVEN 
20 A«A+( l-( N/1000)*2)KI/I000i’BEREK. +SOM 
INHOUD 
30 NEXT 

40 PRI NT" I NH. BOL ■ "2KA" XPIXR*3“ 

30 END 

Als we dit programma uitdraaien dan vinden we: 

Inh. bol -1,333333SXpiXR*3 

De formule klopt dus, immers 4/3 kunnen we geliik 
stellen aan 1,3333335. 


BOLOPPERVLAK 

By de berekening van het boioppervlak gaan we weer 
op dezelfde manier te werk als by het cirkelopper¬ 
vlak met dien verstande dat we nu de bol opdelen in 
een zeer groot aantal piramides waarvan het 

grondvlak samenvalt met een zeer klein deeltje van 
het boloppervlak en de top samenvalt met het 
middelpunt (zie fig. 3). Ook hier zullen we dan eerst 

de formule voor de inhoud van een piramide (Inh. « 

grondvlak » 1/3 hoogte) op zyn juistheid 

onderzoeken. We kunnen hierby fig. 1 weer als 
uitgangspunt nemen. Alleen moeten we dan nu G 
(■grondvlak) lezen i.p.v. B ("basis) en moeten we ons 
voorstellen dat we tegen een zyvlak van een piramide 
aankyken welke we ook nu weer in 1000 schijven 
zullen opdelen. Een nadere uitleg laat ik nu 
achterwege en ik geef u meteen het rekenprogramma: 

10 FOR N«. 5 TO 999. 3 
20 A»A+(N/1000)* 2X1/1000 
30 NEXT 

40 PRINT"Inh. piramida»GK"A"KH" 

50 end 

Voor A zullen we nu vinden .33333325 hetgeen gelyk 
is aan 1/3. Vullen we nu de gehele bol op met een 
zeer groot aantal piramides (de vorm van het 
grondvlak, 3-hoek of veelhoek, doet er niet toe) dan 
zal de bolinh. gelyk zijn aan de som van alle 
grondvlakken maal 1/3R (R«H), dus: 

Inh, - QtotXl/3R 

Omgekeerd geldt dan dat: 

Qtot ■ (Inh. bol) /( 1/3R) 

Oftewel: 

Bolopp. «(4/3KpiKR* 3)/(1/3R)-4KpiKR*2 
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Met wat logisch denkwerk en de hulp van de MSH 
hebben we nu alle geheimen van de cirkel en de bol 
ontsluierd. De enige aan wie we posthuum veel dank 
verschuldigd ztfn is Puthagoras met zijn stelling: "Bii 
een rechthoekige driehoek is het kwadraat van de 
schuine zjjde gelyk aan de som van de kwadraten van 
de beide rechthoekszjjden". 

Ger. 






DISKETTES 

De programma’s uit de MSX-Gidsen zijn ook op 
diskette verkrijgbaar; zowel op 3.5 inch (voor de 
meeste MSX computers) als op 5.25 inch - dub¬ 
belzijdig - voor de Spectravideo 707 drive. Dis¬ 
kette nr. 1 bevat de belangrijkste programma’s 
van MSX-Gids 1 t/m 3. Een verzameldiskette 
dus. Diskette nr. 4 bevat alle programma’s uit 
Gids nr. 4, diskette nr. 5 uit MSX-Gids nr. 5 enz 
enz. 

De diskettes starten automatisch op en zijn ge¬ 
heel menugestuurd met diverse keuzemogelijk¬ 
heden en schermen; alles in hi-res graphics. 
D.m.v. een letter-keuze-menu (gebruik de 
HOOFDIetters!) kunnen de programma’s gela¬ 
den of opgestart worden. Het menu bevat ook 
een overzichtsprogramma, dat geschikt is voor 
twee drives en verder zijn er nog enige informa¬ 
tie- en advertentiepagina’s op de diskette aan¬ 
wezig. 


Ook zijn er cassettes leverbaar met de program¬ 
ma’s uit de MSX-Gidsen. Op deze cassettes 
staan tevens de programma’s die alleen ge¬ 
schikt zijn voor diskdrive en deze programma’s 
moeten wel overgezet worden naar diskette en 
kunnen - uiteraard - zonder diskdrive niet ge¬ 
bruikt worden. De cassettes hebben - net als de 
diskettes - hetzelfde nummer als de MSX-Gids 
waarin de programma’s staan en zijn verkrijg¬ 
baar vanaf nummer 7. 

De cassettes kosten ƒ 15per stuk (België Bfr. 
280) en de diskettes kosten ƒ 25- p.st. (België 
Bfr. 470). Deze prijs is inclusief verzendkosten. 
Diskettes en cassettes bestellen door overma¬ 
king op giro 909515 t.n.v. A. Debels te Lelystad. 
Voor België kan besteld worden op rekening nr. 
235-0430464-87 bij de Generale Bank te Has¬ 
selt t.n.v. J. Herps, Lelystad. 


VERGEET BIJ DE BESTELLING NIET HET 
CASSETTE- OF DISKETTENUMMER EN DE 
SOORT DISKETTE (3.5/5.25) TE VERMELDEN. 

Op de cassettes en diskettes staan niet de klei¬ 
ne programma’s die horen bij een artikel en het 
listingcontroleprogramma. 















































LEER, PROBEER EN 
PROGRAMMEER 

Deel 7 : FOR your NEHT lesson... 

i n u?V v ? r ‘ ge deel leerdon we ü hoe ü de gegevens in 
de klokchip van de MSK-2 computer kunt beïnvloeden 
en hoe met behulp van string handling een fraaie 
output gemaakt kan worden op het scherm. Met 1 
voorbeeld (namelijk het laatste) ging ik toch wel 
even de mist in: de vermeende geneste lus bleek 
hierin niet voor te komen. Sorry als U tot hoofd- 
brekens toe heeft gezocht naar dit verschijnsel! In 
dit 7e deel hoop ik deze fout goed te maken. 

Op mijn vraag naar reakties en tips over de voort¬ 
zetting van de kursus kreeg ik van verschillende 
mensen een briefkaartje. Alhoewel het aantal niet 
echt overtuigend was. heb ik toch kunnen vast¬ 
stellen, dat de volgende onderwerpen aan bod moeten 
komen: 

- File Handling (bestandsbeheer) 

- Sprite besturing 
- De Sound Processor 

Deze onderwerpen worden al in veel boeken bespro¬ 
ken, maar vanwege het animo ga ik het in de MSK 
Gids ook maar weer doen. 

Nu eerst naar een ander onderwerp: de lus. 

- F0R...NEHT - 
Er is in eerdere delen al ter sprake gekomen dat we 
soms programmaregels hebben bedacht, die meerdere 
malen achter elkaar uitgevoerd zouden mogen 
worden. Om herhaaldelilk intypen van deze regels te 
voorkomen, biedt BASIC ons de oplossing in de vorm 
van de F0R...NEKT loop (lus, in deel 3 is dit al kort 
beschreven). 

Het gaat hierbij dus om een routine, die de computer 
1 of meerdere malen moet uitvoeren, alvorens met de 
rest van het programma door te gaan. Een klein 
voorbeeld zal dit verduidelijken: 


1 Q FOR F ■ 1 TO 1 © 

20 PRINT "Lüsvariabale s"jF 
30 NEXT F 

40 PRINT "De lus is gsrssd" 

30 END 

De computer doorloopt na de RUN opdracht de vol¬ 
gende stappen: 

- de eerste regel wordt bereikt, waarin de computer 
opdracht krijgt een nader te omschrijven routine 
uit te voeren, rekening houdend met een teller die 
op 1 gezet wordt en opgehoogd wordt totdat een 
waarde groter dan de eindwaarde (in dit qeval 10) 
bereikt wordt 

regel 20 bevat een uitvoeropdracht naar het 
scherm. Deze wordt uiteraard gewoon uitgevoerd en 
daardoor verschijnt de huidige waarde van de 
Iusvariabele F op het scherm 

m-^uvvt bBV h ? t ^eede deel van de lusopdracht. 
net NtHT wordt de Iusvariabele automatisch opge¬ 
hoogd, in dit geval met de waarde 1 (default). Indien 
de waarde 10 nog niet overschreden is. wordt de lus 
opnieuw uitgevoerd 


g.3'.n 0 "° rdt Ulta ' vnerd *'» F srotor d.„ 10 „ 

- regel 50 tenslotte geeft ons voorbeeld een ’net’ 
einde 

Zoals we zagen wordt F altijd opgehoogd met 1. Dit is 
in veel gevallen juist. Denk bijvoorbeeld aan de si¬ 
tuatie dat we een pauze willen forceren in een 
bewerking (bijv. om een gebruiker tijd te geven 
tekst op het scherm te lezen). Dit is dan een moge- 
Hjkheid: 

10 PRINT "U Kunt dit even lazen" 

20 FOR F « 1 TO 1000 
30 NEXT F 
40 CLS 

50 PRINT "Maar U moet wel snel zijn" 

60 END 

Er kunnen zich echter situaties voordoen waarin een 
grotere of kleinere stap dan 1 nodig is. Dit kunnen 
we dan opgeven door aan de F0R...NEKT lus een STEP 
optie mee te geven: 

10 FOR F ■ 10 TO 100 STEP 10 
20 PRINT F 
30 NEXT F 

40 PRINT "Dit wit de tefel ven 10" 

50 END 

Zo kunt U van de Iusvariabele gebruik maken om een 
tafel uit te printen, maar er zijn natuurlijk talloze 
toepassingen van deze step. Nog een voorbeeld: 

10 FOR F = 100 TO 1 STEP -1 
20 BEEPi PRINT "Beep. . . 

30 NEXT F 
40 END 

De STEP mag dus ook negatief zijn. Tenslotte kan een 
funktie ook deel uitmaken van de F0R...NEHT lus: 

10 FOR.F * 100 TO 1000 STEP F/10 
20 PRINT F 
30 NEXT F 
40 END 

In alle voorbeelden gebruik ik de variabele F. Dit is 
echt willekeurig en vaak afhankelijk van de lieve- 
lingsvariabele van de programmeur. 

Overal waar NEKT F staat, had de F mogen ontbreken. 
Met andere woorden: de Iusvariabele op zich hoeft 
niet genoemd te worden in de NEKT regel. De 
computer weet zelf met welke variabele hy bezig is. 
Sterker nog: de lus wordt sneller als U de extra bal- 
last (de F dus) niet opgeeft! 

Als U met de eindwaarde van de iusvariabele (in ons 
geval F) wilt rekenen, kan dat soms onverwachte 
gevolgen hebben. De waarde van de variabele is na de 
F0R...NEKT lus namelijk 1 hoger dan de eindwaarde die 
in de FOR regel werd opgegeven. Een voorbeeld: 


1 TO 10 STEP 3 


10 FOR F 
20 NEXT 

30 PRINT "F heeft de weerde "j F 
40 END 
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De lus zal twee keer worden uitgevoerd en F heeft 
daarna de waarde 11. Oppaesen duel 
Het is vaak nodig om binnen een lus nog een lus te 
doorlopen. Dat kan gelukkig eenvoudig in BASIC. Ue 
noemen dit NESTEN: 

10 FOR F ■ 1 TO 3 

20 FOR G ■ 20 TO 30 STEP 3 

30 PRINT “F ■ " | F 

40 PRINT " G • "| Q 

50 NEXT G 

60 NEXT F 

Een belangrijke wet bij het nesten van lussen is dat 
deze elkaar alleen mogen omarmen: twee lussen krui¬ 
sen elkaar nooit. De een ligt altijd volledig binnen de 
ander: 

FOR 1 .-.] 

FOR S . 3 j 

FOR 3 .] ] j 

1 1 ] 

NEXT 3 . 3 3 3 

1 ] 

NEXT 2 .] 3 

NEXT 1 j 

Zelfs bij geneste lussen is het niet strikt noodzake- 
lijk achter de NEKT een variabele te noemen. Vanwege 
dokumentatie doeleinden is het echter tijdens de 
ontwikkeling van het programma wel aan te bevelen 
de lusvariabelen met name te noemen! 

De buitenste lus geeft aan hoe vaak de daarbinnen 
liggende lussen worden uitgevoerd. Dit gaat net 
zolang door totdat de binnenste lus bereikt is. Deze 
wordt volledig afgewerkt en daarna wordt zijn omar- 
mende lus verwerkt, net zolang totdat de buitenste 
schil van deze brei bereikt is. Dit bracht me tot het 
volgende voorbeeld: 

10 FOR F = 1 TO 3 

20 BEEPi COLOR , F 

30 FOR G ■ 10 TO 20 STEP 2 

40 LOCATE F,G 

50 PRINT "X" 

60 FOR H - 1 TO 1000 !NEXT 
70 COLOR , 7-F 
80 NEXT 
90 NEXT 

100 COLOR 15, 4, 4 
110 END 

Als U dit een beetje doorziet, mag het geen probleem 
meer zyn de tafel van 1 t/m 3 naast elkaar (in ko¬ 
lommen) op het scherm te laten verschenen met be- 
hulp van de F0R...NEHT loops (gekombineerd met Uw 
reeds opgedane kennis omtrent de LOCATE opdracht). 
Oefening baart kunst! 


een jerrycan naar het dichtstbijzijnde tankstation. 
Zoniet, dan maakt U de motorkap open om daar de 
boel te inspekteren. Afhankelijk van een bepaald 
gegeven onderneemt U een bepaalde aktie. 

Uw computer is in feite een apparaat dat konstant 
beslissingen moet nemen, afhankelijk van de gegevens 
die hem aangeboden worden. Is een programma al be¬ 
ëindigd of volgen er nog regels? Is de invoer op een 
vraag goed of fout? Moet na het drukken op een 
toets iets op het scherm of op de printer afgedrukt 
worden? Allemaal vragen die in BASIC gesteld moeten 
kunnen worden en waarmee U het verloop van de 
verwerking kunt sturen. 

Met de IF...THEN...ELSE opdracht krijgt U de mogelijk¬ 
heid om de computer vooraf te vertellen wat er in 
een bepaalde situatie gedaan moet worden. 

De syntax is dan ook: 

IF (uitdrukking) THEN ( statement) 
i ELSE (st atement) ] 

De uitdrukking achter IF is een vergelilkingsop- 
dracht, bijvoorbeeld: r 

IF F - 5. 


Na THEN geeft men aan wat er moet gebeuren als de 
uitdrukking (F ■ 5) inderdaad waar blijkt te zijn: 

. THEN PRINT "0000" . 

Met ELSE kan men aangeven wat de computer moet 
doen als (in ons geval) F niet geltyk is aan 5: 

. ELSE PRINT "0" 

IF en THEN moeten altijd in 1 regel voorkomen, 
behalve in het geval er een GOTO opdracht na THEN 

knmt! 


IF F * 5 GOTO 10 ELSE PRINT "0" 

Deze regel doet hetzelfde als: 

IF F a 5 THEN 10 ELSE PRINT "0" 

Zo ziet U dat voor een GOTO THEN mag worden weg¬ 
gelaten. Bovendien is het gedeelte met ELSE niet 
noodzakelijk: 

IF F = 3 THEN PRINT "0000" 

is een uitstekende regel. Als deze uitdrukking niet 
waar is (F is bijv. 4), dan wordt het programma 
vervolgd op de regel die na deze IF-regel komt. Om 
het nog ingewikkelder te maken kunnen er meerdere 
IF-statements op 1 regel voorkomen om gedetailleerde 
vragen te stellen: 


- IF...THEN...ELSE - 

Een onderwerp dat in deel 3 van deze kursus ook 
“^ r HBrd uitgelegd, betreft de afvragingssyntax i 
BASIC met behulp van het IF-statement. 

Niet alleen in programma's, maar ook in ons dageliik 
leven worden we kontinu gekonfronteerd met he 
nemen van beslissingen, afhankelijk van de situati 
waarin we ons bevinden. Als Uw auto niet wil startei 
kijkt U of de brandstof op is. Zo ja, dan gaat U me 


IF F * 5 THEN GOTO 10 ELSE IF F - 10 THEN 
GOTO 20 ELSE IF F - 15 THEN PRINT "0" ELSE 
PRINT "Geen van allen" 

Dit kunt U (als de lengte van de regel het toeiaat) 
natuurlijk mooier formuleren om tydens onderhoud 
van het programma niet uren te hoeven zoeken: 
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IF ( F * 5 ) THEN GOTO 10 
ELSE 

IF ( F « 10 ) THEN GOTO 20 
ELSE 

IF ( F * 15 ) THEN PRINT " 0 »' 

ELSE 

PRINT "Geen van allen" 

Een dergelyke methode is soms te lang, maar geeft 
indien mogelyk wel een veel beter inzicht in het 
verloop van de afvragingen. 

Het afvragen of een uitdrukking waar of niet waar 
is, noemen we in dit verband relationele bewerkingen. 
BASIC kent meerdere van dit soort bewerkingen: 

■ i* gelijk 

* klainer 

* groter 

< > ol > < niet gelijk 

< * of * < kleiner of gelijk 

> ■ of * > groter of gelijk 

Zo kunt U bijvoorbeeld ook afvragen: 

IF 5 < 3 GOTO 10 ELSE PRINT " 0 " 

Natuurlyk is deze uitdrukking nooit waar en zal altiid 
" ®" afgedrukt worden. 

In plaats van getallen of variabelen kunnen ook kom- 
plete berekeningen als uitdrukking gebruikt worden 
en krtygsn we byvoorbeeld het volgende: 

IF F - S > G X 4 THEN PRINT "JA!" 

Het moge duidelijk zyn wat er met behulp van deze in 
principe eenvoudige statements aan programma- 
besturing gedaan kan worden. U kunt alle kanten op, 
maar probeer wel om het een en ander gestruk- 
tureerd op te zetten, zodat U niet talloze IF...THEN 
regels gaat programmeren om Uw eigen puinhoop te 
ontvluchten) 

Als U dit nog niet mooi genoeg vindt, kunt U aan de 
uitdrukkingen zelfs nog logische bewerkingen 
toevoegen. Dit zyn byvoorbeeld: 

AND OR NOT HOR 

De IF regels komen er dan zo uit te zien: 

IF F ■ 5 AND W « 3 THEN PRINT " 0 " 


of 


IF F > ! OR 0 • a THEN PRINT "0" 


In Uw BASIC boek vindt U nog meer van dergelyke 
uitdrukkingen. U zult ze ook zelf veel gaan gebruiken 
in Uw software en ik ben er dan ook van overtuigd 
dat ik hier niet by hoef te zeggen dat U flink moet 
oefenen. (Dit is zeer belangryk !!!) 

-DATA EN READ- 

In alle delen van de kursus is er sprake van het 
toewijzen van waardes aan variabelen en het ver¬ 
werken (afdrukken, berekenen, etc) van die waardes. 
We hadden al de LET opdracht, waarmee we aan een 
willekeurige variabele een waarde konden toekennen. 
Dat deden we als de waarde van de variabele ten 
tijde van de programmaontwikkeling al vaststond (of 
als reeds bekend was hoe de waarde tot stand diende 
te komen). 


Met INPUT kunnen we variabelen tijdens het uitvoe- 
ren van het programma een waarde geven, die afhan¬ 
kelijk is van hetgeen de gebruiker op dat moment 
juist acht. 

Naast deze twee meest gebruikte manieren is er nog 
een manier om waardes van variabelen vast te leg¬ 
gen in een programma en op een gegeven moment te 
gaan gebruiken: met DATA en REAÖ. 

Een DATA-regel is een BASIC regel waarin 1 of meer¬ 
dere getallen of woorden staan. De waardes zijn 
onderling gescheiden door middel van Komma’s: 

10 DATA A, 3, klaas, 89 

Zoals U ziet is het mogelyk om verschillende soorten 
gegevens (zowel numeriek als alfanumeriek) in een 
regel op te slaan. Een dergelijke regel gedraagt zich 
als een REM-regel (REMARK): de regel wordt niet 
uitgevoerd, hy is alleen maar aanwezig als gegevens¬ 
drager. Als we een programma met alleen maar DATA- 
regels opstarten zal de computer dan ook direkt 
klaar zyn. 

Er is nog wel een opmerking over het vullen van een 
DATA-regel. Omdat de komma en de dubbele punt een 
belangryke betekenis hebben in BASIC (komma als 
scheiding tussen gegevens, dubbele punt als schei¬ 
ding tussen statements) mogen deze tekens niet 
zomaar als gegeven in een DATA-regel staan. Dit moet 
als volgt opgelost worden: 

1® DATA ":TEKST:NOG: MEER" 

Laten we byvoorbeeld het aanhalingsteken voor het 
woorctJe NOG weg, dan denkt de computer dat bij de 
dubbele punt achter NOG de DATA-regel is afgelopen 
en er een volgende opdracht begint. Dit is natuurlyk 
niet de bedoeling. 

Als we gegevens opslaan, willen we ze meestal ook 
weer gebruiken. Met READ kunnen we variabelen 
waardes geven uit de DATA-regels: 

1) 1® READ A»,B,C* 

20 PRINT Ati " "|B;" "|C* 

I® DATA Nummer,l,in Nederland 


2) 10 READ A 

20 READ B 
3® DATA 3 
4® READ C 
5® DATA 4,5 ,6 

In voorbeeld 1) lezen we uit DATA-regel 30 een 
alfanumeriek gegeven, dan een numeriek gegeven en 
daarna weer alfanumeriek. De variabelen in de READ- 
regel moeten dus overeenkomen met de waardes in de 
DATA-regel. Hadden we van regel 10 gemaakt: 

19 READ A, B, C 

dan zou de computer U moeten teleurstellen met 
een fout. A kan byvoorbeeld niet het woord 
Nummer bevatten. 

In voorbeeld 2 is de opzet iets anders. De data is 
verdeeld over twee regels en in 3 READ opdrachten 
wordt het er uit gehaald. Het is zo dat na RUN de 
eerste DATA-regel in een programma wordt aangespro¬ 
ken voor de eerste READ opdracht. READ A zal in dit 
geval dus opleveren dat A * 3. 
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READ B zorgt er voor dat naar de tweede DATA-regel 
wordt gekeken (omdat de eerste al geheel gelezen is) 
en B krijgt dan de waarde 4. Zo krijgt C de waarde 5. 
De G in de laatste DATA-regel blijft onbenut, maar 
dat hoeft op zich geen probleem te zijn. Zolang het 
aantal DATA-gegevens maar niet kleiner is dan het 
aantal in READ opgegeven variabelen! 

10 DATA 1,2,3 
80 READ A, B,C,D 

zal dan ook de melding Out of DATA (geen data meer 
te vinden) geven. 

Om nu in 1 programmarun dezelfde DATA-regels vaker 
dan 1 keer te kunnen gebruiken, is er een RESTORE- 
statement. 

RESTORE doet in feite niets anders dan de pointer 
(aanwijzer) voor de READ opdrachten terug te zetten 
naar de eerste DATA regel die in een programma 
voorkomt (m.a.w. de DATA-regel met het laagste regel¬ 
nummer). Geven we dus het volgende: 

10 DATA 4 
80 READ A 
30 RESTORE 
40 READ B 

dan krijgt A de waarde 4, RESTORE zet de pointer 
weer op regel 10 en de READ in regel 40 kan ook 
weer goed gaan (B wordt ook 4). Zo kan men 1 DATA- 
regel meerdere keren lezen. Is er echter een groter 
aanbod van gegevens en wil men een bepaalde start- 
waarde meegeven aan de RESTORE, dan is dat toege¬ 
staan: 

1 0 READ A, B, C,D 
80 RESTORE 50 
30 READ E,F 
40 DATA 1 , 2 

45 REM -ik sta tussen de data 

50 DATA 3, 4 

Nu worden A t/m D respektievelijk gevuld met 1 t/m 
4, de RESTORE zet de pointer op regel 50 en in regel 
30 zal vanaf die bewuste DATA-regel gelezen worden: 

E en F worden dus gevuld met 3 en 4! 

Hadden we een restore op bijvoorbeeld regel 45 gege¬ 
ven (wat geen DATA-regel is), dan zou de computer 
zelf de eerst daaropvolgende DATA-regel gezocht 
hebben en daardoor toch op regel 50 zyn beland. 

U begrypt waarschijnlijk dat we zo langzamerhand 
naar een programma toegaan, waarmee we meer kun¬ 
nen dan alleen maar enkele berekeningen uitvoeren. 
Het is namelijk belangrijk om alle gegevens die we 
invoeren op te slaan op een medium, dat later weer 
terug te lezen is (anders blijven we typen). Over 
enige 'lessen’ zullen we dan ook zover zijn dat U in 
staat bent uitvoer naar een opslagmedium te plegen, 
zodat U een eigen gegevensbank kunt bouwen. 
Daarby z Ü n ®He besproken statements in dit deel en 
de voorafgaande delen van groot belang, dus het is 
zeer zinvol om dit (indien U het vergeten bent) nog 
eens goed door te nemen. 


Dit deel is kort, maar geeft U wel iets om over na te 
denken. Probeert U vooral zelf de voorbeelden uit en 
maak daarop varianten om tot verbazende ontdekkin¬ 
gen te komen. 


T —j “ w y *«*» «ei nart muei, is mi in ei¬ 

gen verhuizing: sinds 23 januari j.I. woon ik in Dwin- 
geloo op het volgende adres: 


Richard Altenburg 
Kerkpad 31 
7991 CS Dwingeloo 

Dit adres is vanaf nu dus ook te gebruiken voor 
Korrespondentie over de inhoud van de kursus pro¬ 
grammeren en de testrapporten die in deze Gids van 
mijn hand verschijnen. 

Graag tot de volgende keer! 

Richard Altenburg 
i.s.m. 

Ina Stam 


ABONNEMENTEN 

EEN ABONNEMENT IS 
VOORDELIGER EN JE MIST GEEN 
NUMMERS! 

Een abonnement op de MSX-Gids kost ƒ 40- 
per 6 nummers en is te verkrijgen door over¬ 
making van dit bedrag op Giro: 5036011 t.n.v. 
J. Herps, Postbus 516, Lelystad. 

Voor België: Bfr. 750 op bankrekeningnummer 
235-0430464-87 bij de Generale Bank te 
Hasselt, t.n.v. J. Herps te Lelystad. 

Abonnementen worden aangegaan voor een 
periode van 12 maanden en de abonnees 
krijgen, voor het verstrijken van het abonne¬ 
ment, een bericht van de uitgeefster en kunnen 
dan hun abonnement verlengen. Indien een ver¬ 
lenging niet gewenst is hoeft verder niet te wor¬ 
den betaald: opzeggen van een abonnement is 
niet nodig, maar wordt wel op prijs gesteld. 

Girobetaalkaarten of Eurocheques (vergeet niet 
het nummer op de achterzijde) voor een abon¬ 
nement kunnen gestuurd worden naar: 

Uitgeverij Herps, 

Postbus 516, 

8200 AM Lelystad. 
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Correcties op 
eerdere programma’s 


ZEESLAG 

Dit is de snelste correctie tot nu toe want het 
programma staat in dit nummer, maar het wijzigen 
van de uitdraai was niet meer mogelijk. Deze veran¬ 
dering zorat ervoor dat er ook schepen kunnen 
worden geplaatst op de onderste- en meest rechtse 
rij. Regel 1400 moet alsvolgt worden gewijzigd: 

1400 HH-INT(RNDü)#15+l):HY-INT(RND(l)«15+l): 
R S INT(RND(1)«2*1) 


BREAKIT EN SCREEN 1 EDITOR 

De verbetering in de SCREEN1 editor zorgt ervoor 
dat de gemaakte ASCII- files op iedere MSH computer 
werken. De verbetering heeft dus geen invloed op de 
werking van het programma zelf, maar op de werking 
van de gemaakte files! Deze verbetering moet ieder¬ 
een, die het programma gebruikt, doorvoeren!! Voor 
het niet goed werken van de SCREEN1 editor op 
sommige M5H-1 machines is helaas geen oplossing 
gevonden. De wijziging heeft wel consequenties voor 
de grootte van de patroon- en kleur- tabel. Deze was 
in eerste instantie slechts 2048 bytes, maar is nu 
8144 bytes geworden. De patroontabel begint weer op 
adres OOOOh en bestaat nu eigenlijk uit drie tabellen 
van 2048 bytes. De eerste 2048 bytes gelden voor de 
bovenste 8 regels van het scherm, de volgende 2048 
voor de daaropvolgende 8 regels, enz. De kleurtabel 
begint op adres 2u00h en bestaat ook weer uit drie 
tabellen, dus de eerste 2048 bytes weer voor de 
bovenste 8 regels, enz. enz. Even alles op een rijtje: 

ADRESGEBIED VRAM FUNCTIE 

ÖÖÖOh - 07FFh patroontabel regels 0-7 
patroontabel regels 8-15 
patroontabel regels 16-23 
kleurtabel regels 0-7 
kleurtabel regels 8-15 
kleurtabel regels 16-23 
Deze indeling geldt trouwens ook voor 5CREEN2. De 
volgende verbetering is voor de SCREEN1 editor: 


0800h 
1 000 h 
2000h 
£800h 
3000h 


0FFFh 
1 7FFh 
27FFh 
2FFFh 
37FFh 


1900 PRINT#1,”10020 VDP(1)=VDP(1)AND191:CL 
S:SCREEN1:WIDTH32: POKE&HF3B1,25: VDP(0>=2: V 
DP(2)=6:VDP(3)=159:VDP(4)=0:VDP(5)=54:VDP< 
6)=7:GOSUB15040:VDP(l)=VDP(l)OR64:VDP(3)=2 
55:VDP(4)=3:RETURN” 


1940 PRimi," 15030 DATA 42, DD, CD, 4D, M, 23 
* Cl,10,F5,C1,10,DD,C9,01,00,02,79, 0Fj 0F,0F 
, 0F, 4F,IA, 13,FE,41,38,04,D6,37,18,02,D6,30 
,BI,4F,10,EA,79,09,21,00,00,11,00,08,01,00 
, 08, CD, 4A, 00, EB, CD,4D,00,EB,13, 23,0B,78,BI 
,20,Fl,C9” .... 

1950 PRINT#1,"15040 RESTORE15020:FORI=0TO1 
17:READHS:POKE&HDD00+I,VAL <"+CHR$ <34)+”&H” 
+CHR$<34)+”+H$):NEXT: DEFUSR0=&HDD0D: DEFUSR 
1=&HDD00:DUMY=USR1 (”+FNS$(PEEK (&HE0CE) )+”) 

:GOSUB20020:DEFUSR2=&HDD5D:DUMY=USR2 <0>•PO 
KE&HDD62,16: DUMY=USR2(0)” 

1955 PRINT#1,”15050 POKE&HDD5F,32:PQKE&HDD 
62,40:DUMY=USR2(0): P0KE&HDD62,48: DUMY=USR2 
(0):RETURN” 


Ook met BREAKIT waren er problemen op diverse 

m « i maC ,! linB8 *? deze zoude n «et onderstaande 
wijziging zijn verholpen: 

) 159:VDP <4)-0:VDP(5)=54:VDP(6) = 7 - GOSUB205 
?UrS P (1 > = VDP < 1 > OR64: VDP <3) =255 : VDP U > 3?£ 


i040_DATA 42,DD,CD,4D. 00 ,23.Cl 10 F5 Cl ]@ 
’ „o ’ 01 ’ 00 ' 02 ' 79 * 0F » ®F, 0F, 0F, 4F IA,' Ï3* FE 
, 41,38,04, D6,37,18, 02, D6,30, BI, 4F, 10 EA 79 
> 21.00, 00,11,00, 08, 01,00,08, CD, 4A,’ 00,’ BB 

,CD,4D,00,EB,13,23,0B,78,BI,20,Fl,C9 
20 jj 0 RESTORE2030:FORI=0TO117:READH$:POKE&H 

: NEXT: DEFUSR0=&HDD0D: DE 
FUSR1-&HDD00:DEFUSR2=&HDD5D:DUMY=USR1(81)• 
GOSUB2080:DUMY=USR2(0):POKE&HDD62,16:DUMY= 
USR2C0):P0KE&HDD5F,32:P0KE&HDD62, 40: DUMY=U 
8R2 (0): P0KE&HDD62, 48: DUJtY=USR2 (0): RETURN 


VERSCRIPT TEKSTVERWERKER 
Enkele cassettegebruikers hebben problemen met het 
terughalen van tekstfiles van de band. De file wordt 
wel gevonden, maar de cassette blijft verder door¬ 
draaien en het programma komt niet op gang. Het 
gaat hier niet om een echte fout in het programma, 
maar waarschijnlijk gaat het wegschrijven -in sommi¬ 
ge gevallen- iets te snel, zodat bij het weer inlezen 
soms enkele bytes worden gemist en het programma 
hierna blijft zoeken. Dit hoeft niet telkens te 
gebeuren, omdat ook de service- interrupt routine 
oponthoud kan veroorzaken. Een interrupt tydens de 
instructie die de foutmeldingen geven, kan genoeg 
zijn om de krappe tijd te krap te maken. 


° nd ® rstaand Programmaatje leest de tekstver- 

V0Crt de wi J 2i 9 in g In- Daarna de tekst- 
verwerker weer saven met: 

BASVE M CAS:naam ,, ,AHBDCl,AHDD97,4HBFFE 

afhangt"^ V °° r 2 ‘ Ch dat Van de ^bruiker 

10 CLEAR200, &HBD00I BLOAD"CASi naam" 

20 FORI=&HDD7D TO &HDD97 
30 READ A$iPOKE I,VAL("&H"+A») 

40 NEXT 

50 POKE &HD8E4,&H84 
52 POKE &HD8E5,&HDD 
54 POKE &HD8ED, &H8C 
56 POKE &HD8EE,&HDD 
58 POKE &HD8F8,&H84 
60 POKE &HD8F9,&HDD 

80 DATA 00, 00, 00, CD, EE, D2, C9 
82 DATA CD, ED, 00, E3, E3,E3,E3 
84 DATA C9,CD, ED, 00,21,00,00 
86 DATA 2B, 7C, B5.C8, 18, FA 
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Hallo, adventurefreaks! Daar gaan 
we weer met enkele pagina’s vol 
besprekingen, tips en inzendingen. 
Allereerst iedereen hartelijk be¬ 
dankt voor alle brieven met tips 
e.d. die hier binnenkwamen voor 
deze rubriek. Vooral op de oproep 
betreffende Metal Gear is een heel 
pak brieven gekomen, waarvan we 
er 1 hebben geplaatst, die zo'n 
duidelijk overzicht geeft, dat het 
nu voor iedereen mogelijk moet 
zijn het spel tot een goed einde 
te brengen. Zelf hadden we het al 
uitgekregen, voordat de tips arri¬ 
veerden, al hebben we lang vast¬ 
gezeten bij de bulldozer..... 

Verder zijn we hier helemaal uit 
ons bol gegaan met enige geimpor- 
teerde Japanse rompacks. Vooral 
het grafische adventure "Dragon- 
siauer IV heeft mij dagen (en 
nacnten) beziggehouden. Ue hebben 
hier Japanse tekens zitten omzet¬ 
ten in leesbaar schrift om pass- 
words in het Japans te kunnen in¬ 
voeren en zelfs Japanse woorden¬ 
boeken gekocht om iets van de 
handleiding te begrijpen. En er 
zijn er nog meer onderweg...... 


OP %’N JAPANS 

Naam > DEEP FOREST 
Lav. i XAIN 
Mach.i MSXS 

Prijs! MEGA-ROMPACK FL.99,-- 

Een van de originele Japanse rom- 
acks, die de Nederlandse markt 
eeft gehaald, is Deep Forest, dat 
qua opzet sterk doet denken aan 
"Dragonslager IV, maar dat ik 
persoonlijk grafisch wat minder 
mooi vind. Dat houdt echter in, 
dat het nog steeds ver uitsteekt 
boven het gemiddelde. Dankzij de 
Nederlandse importeur is deze 
rompack voorzien van een summie¬ 
re Engelse handleiding, waarin de 
belangrijkste Japanse teksten zijn 
vertaald. Op het beeldscherm komt 
weinig of geen Engels voor. 

Wat exact het doel van het spel 
is, blijkt niet uit de handleiding, 
maar je bent een "warrior", die 
met behulp van wapens -die ver¬ 
overd of gekocht kunnen worden- 
allerlel tegenstanders moet ver¬ 
slaan. Er zijn allerlei soorten win¬ 
keltjes, waar magie, power, wapens, 


drankjes etc. gekocht kunnen 
worden en het geld daarvoor komt 
beschikbaar tijdens de gevechten 
(mits je wint natuurlijk). 

Er is een prinses, die je kan hel¬ 
pen door met haar te praten, 
maar of je een verstaanbaar ant¬ 
woord krijgt, is hier nog niet be¬ 
kend. Deze spellen zijn echt voor 
de liefhebbers van het zeer moei¬ 
lijke werk. 


RED DE WERELD IN.™. 

Naam i TERRAMEX 

Lev. : GRAND SLAM ENT. LTD. 

Mach.i MSX 1 &2 

Prijsi CAS. Fl.35,-- 


BEELD iiiii 

GELUID : iiiii 

SPELKHALITEIT: sbiss 
DOCUMENTATIE : m 
PRIJS im 


Voor degenen, die niet in het bezit 
zijn van een MSH-2, is er ook een 
heel aardig adventure uitgebracht. 
Natuurlijk kunnen de MSK-2 bezit¬ 
ters het ook kopen, alleen moet je 
dan even opletten met het inladen, 
want eerst moet screen 0 op 
WIDTH40 gezet worden, anders kun 
je het wel vergeten. 
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In Terramex gaat het erom, dat de 
aarde bedreigd wordt door een gi¬ 
gantische asteroïde en de eniqe, 
die hulp kan bieden is Prof. Eue- 
strain. Deze heeft zich echter in 
een onherbergzaam gebied terug¬ 
getrokken, nadat iedereen hem 
voor gek had verklaard vanwege 
zijn theorie over de asteroide, dus 
nu moet er een vrijwilliger op af 
om hem te zoeken. 

Je hebt hiervoor de keus uit 5 
personages, die elk eBn specifieke 
eigenschap hebben. Als helpers 
heeft degene die je uitzoekt, een 
aantal inboorlingen, dat de spullen, 
die hij vindt, voor hem draaqt. 
Het leuke bij dit spel is, dat je de 
hoofdpersoon kunt laten denken. 
In een bepaalde situatie laat hij 
dan zien, welk voorwerp je nodig 
hebt en dat kun je dan door een 
keuze- optie bij een van je dra¬ 
gers ruilen voor het object, dat 
je op dat moment bij je draagt. 
Je hebt hier dus niet, dat je maar 
4 of 5 dingen kunt meedragen, 

Terramex is geen specifiek 
nbn-spel, hetgeen aan de graphics 
te zien is. Het spelniveau is ech- 
ter vrij hoog en je bent er niet 
zo 1,2,3 mee uitgespeeld. De bedie¬ 
ning gaat vrij makkelijk. 

BEELD 
GELUID 

SPELKUALITEIT 
DOCUMENTATIE 
PRIJS 


BBS 

BBS 

BBBB 

BBBB 

BBB 


TIPS 

NEMESIS n 
Met behulp van 2 cartridge- slots 
in uw computer kunt u het vol¬ 
gende doen: Stop Nemesis II in slot 
1 en The Maze of Galious in slot 2. 
Dan kun je, als je afgaat, de 
spullen (zoals missile of laser) 

i , nAL.™ U9kri J9 en - Er staat dan 
BACKUP, waarna je op de M moet 
drukken. Na FS (alle schepen ka¬ 
pot) is er geen backup mogelijk. 

Met Nemesis II in slot 1 en Pen- 
guin Adventure in slot 2, wordt 
het eigenlijk een Penguin Adven¬ 
ture II. 

E.ZWANG. Tel. 078-138182. 



SIERREKAARI KNIGHTTYME 


Bij de start van het spel bevindt het schip zich bij 
8RIGHTSTAR. 

l£222E2££22£l222£rïi n at e n : 

Schip: XO YO ZO 
Starbase 1 : XI Y2 Z3 
f'lonopole: XI Y8 Z4 
Retreat: X8 Y4 Z1 
Outpost: X8 Y9 Z6 


KNIGHT TYME I 

Ga naar Derby IV en vraag om 
hulp. Pak op wat hij geeft en haal 
de camera. Pak de film bij Gordon. 
Doe je onzichtbaarheidsmantel af 
(Niet laten vallen, want je ziet 
hem niet liggen). Als je die draagt, 
zal iedereen Ie negeren. Zoek een 
robot, geef hem camera + film. 
Vraag hem om hulp en pak het 
voorwerp, dat hij geeft. Pak van 
een der robots de pot lijm. Deze 
kun je nu niet meer kwijt, maar 


later vind je iemand, die hem wil 
nebben. Je moet nu een geldige 
ID-kaart hebben: draag die. Sarab 
"“ft iets te eten, dat je moet 
pakken, anders sterf je van uit¬ 
putting. 

Er zijn veel voorwerpen in het 
schip, die je niet allemaal kunt 
dragen. Verzamel belangrijke voor¬ 
open op een centrale plaats, 
bijv. bij de transporter. Van Sha- 
ron krijg je informatie in ruil 
voor een kado, dat je bij Derbu IV 
haalt. De advertentie (Sharon) kun 


seTTiMKe 

“° rdt "" beMrdeli "9 9.ge..n ..t sterren, „elk. de „eigende „eerden „ertegen- 

bbbbb = ZEER GOED BBBB = GOED BBB = REDELIJK BB = MATIG b = SLECHT 
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j® gebruiken als opstapje om op 
een Kast te komen. Het gasmasker 
(bharon) beschermt je op bepaalde 
planeten, maar als je het draagt, 
kunnen anderen je niet verstaan. 
Geef Gordon zijn beker en de 
sterrekaart. Nu kun je het schip 
laten vliegen naar de planeten (zie 
kaart), vlieg via rolaris naar 
atarbase I. Gordon repareert nu 
op jouw verzoek de Transporter. 
Coördinaten sterreschip: xOyGzO. 

Als iemand niet op je reageert, 
probeer dan: ’m eventueel wakker 
te maken: gasmasker c.q. onzicht- 
baarheidsmantel afdoen; een Forti- 
fg- spell geven. 

Als je bij een planeet "communica- 
tic geeft, kun je om hulp vragen. 
Je krijgt dan vaak interessante 
informatie, maar laat je niet voor 
de gek houden. Het schip bijtan¬ 
ken. Doe dat tijdig en hou er re¬ 
kening mee, dat niet elke planeet 
(genoeg) brandstof heeft. 

Gebruik de transporter alleen op 
plaatsen, waar je de juiste coördi¬ 
naten zeker weet. Neem de nodige 
voorzorgsmaatregelen, voordat ie 
een planeet bezoekt. 

Op Starbase I vind je laarzen, 
nandig om onhoorbaar te lopen op 
plaatsen waar je niet gewenst 
bent. Hier vind Ie ook iemand, die 
van lijm houdt, ten zak aardappe¬ 
len kun je op een andere planeet 
gebruiken als kado. Een bijl dient 
om Barrières op te ruimen m.b.v. 
een Spell. Een bronzen hanger 
zorgt voor spoedig herstel van je 


GEEN GESCHIET 

Naam i STREAKER 

Lav. i BULLDOG SOFTWARE 

Mach. i MSX 1&8 

Prijai CAS. Fl. 9,90 


Dit is weer zo’n spel waarvan je 
niet weet of het nu wel of geen 
adventure is. Ue plakken het dan 
ook maar direct achter het adven¬ 
ture gedeelte. 

Bij streaker begin je als een 
naakt mannetje, dat door het ont¬ 
breken van Kleding overal wordt 
geweigerd. Het is dus zaak zo snel 
mogelfjk kledingstukken te vinden 
om * de diverse ruimters (Cafe’s, 
bar’s, e.d.) binnen te komen. 
Uiteraard zijn er tegenstanders 
en bij dit spel zijn dat enkele 
vervelende killers en de -nog 
lastiger- dieven, die kleding van 
je afpakken. Schieten kan nu eens 
niet! Ontwijken is (voor zover wij 
hebben ondervonden) de enige mo¬ 
gelijkheid. Je hebt een energy-, 
een hunger- en een sleep- balk, 
die je moet aanvullen met allerlei 
items, welke onderweg zijn te 
vinden. Het spel ligt werkelijk 
bezaaid met de meest vreemde ob¬ 
jecten en het is dan ook een 
flinke klus om uit te vinden waar 
alles voor dient. 


Spell- Power. 

Het belangrijkste doel is het ver¬ 
zamelen van 3 onderdelen van een 
zonnewijzer. Kijk goed op diverse 
planeten; het is soms moeilijk te 
zien. Een van de individuen op een 
"onvriendelijke" planeet heeft ook 
een deel. Als je de 3 delen hebt, 
kun je ze samenvoegen met een 
flitsende Spell. Leg ze in een ruim- 
te van het schip en geef de be¬ 
doelde Spell. Pak nu de zonnewij¬ 
zer. Nu kun je verder naar een 
planeet, waar je eerst niet verder 
kon. NB: de zonnewijzer niet Dra- 

S en (Wear), maar gewoon bij je 
ouden. Als je dit goed doet, is er 
in de luchtsluis van het schip iets 
verschenen. 

Op deze manier heb ik 85% van het 
spel opgelost, maar ik ben op dit 
moment nog niet verder. Eventuele 
aanvullende aanwijzigingen qraaq 
naar mijn adres. 

Verder tips te ruilen van de vol¬ 
gende adventures: Stormbringer, 
Erfenis, Spu Story, Classic Adven¬ 
ture, Zakil Wood, Hobbit, Red Moon, 
Worm in Paradise, Salvage e.a. 

R.H.M.WEGGEN, LEGGELOO 31A, 7991 
PU DUINGELOO. 

Nog wat tips: reis op Speed 1, dan 
hoer je niet te tanken en kun je 
elke planeet bereiken. De spiegel 
laat je voorwerpen zien boven in 
beeld. Gooi ’m niet weg. maar geef 
hem aan Sharon of zo. Spellpower 
krijg je door de Bag of Runes en 
Ancient Scroll bij je te dragen. 


STORMBRINGER (KNI6HT TYME ID 
In de put kun je een ei laten val¬ 
len. Je mag dan een wens doen. Ik 

S a steeds dood in het kasteel, 
feet iemand daar iets op? 

NIKKY CLAES, BALISTRAAT 42-2, 
1094 JN AMSTERDAM. 

++++++++++++++++ ++++++++++t++ 

ZAKIL WOOD 

Cross River: Search Bush 
Enter Cottage: Drop Canoe 
Spell of Uiten: On Paper 
Path of Eternal Sleep: Get Leaves 

n . » then N-E-S-W-E 
Kill Pgral: Type HELP at ravine 
Throw phial 

Have Nothing Red: Pull Stone in 
Cottage; 

Killed oy Mist at Cave: Examine 
Pyral 

Dark inside Cave: Look inside 
Entrance 

Water gushing too fast: üse 
Leaves 

Crevice in Cave: Chop Trees 

Cross Crevice: Vault crevice 

Axe: Search bush outside cottaqe 

Get on Plinth: Fly Broom 

Find Paper: Move Bed 

Aroma of Sleep: Get Leaves on 

Path 

Scroll: Inside Cave 
Search Ledge 

Met dank aan: F.JAGER, VEENDAM. 
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In tegenstelling met wat er in de 
handleiding staat, kan het spel 
met zowel joystick als keyboard 
worden gespeeld en het geheel 
loopt via diverse keuzemenu’s 
(drop, piek up, wear, enz.) zodat 
geen teksten hoeven ingevoerd te 
worden. Grafisch is het spel 
redelijk, geluid is er nauwelijks, 
maar als spel is het erg leuk, al is 
het iets te traag. De prijs maakt 
het extra interessant. 


BEELD 

GELUID 

SPELKWALITEI t! 
DOCUMENTATIE ; 
PRIJS 


■ II 
BS 

BBBB 

SBB 

SSSBS 


































“* databank 

01880-38630 

P.O.BOX 4331 

__ 3006 AH ROTTERDAM 

Systeembeheerder: R.A. Verhoog 
Privé Cspraak> 01880-41350 CompieBus: mm 




Wa.t eens be-groxi a.ls een MSX-dlaita.- 
.banfc met een TOSHIBA HSX-L is £ x\l tot 
grootste GRATIS hob.by-databank 
ijitgregr-oeid., die voor sowel d.e MSX ? a.ls 
öu ^ : T sJt-i03r* Commodore, Atari en miet te 
vergreten de P.C_; toeg^axiRelijlc is_ 

De opset is gelijlc aan Viditel, sij Het 
echter- dat d.e ge.bruiker niets hoeft 
te betalen dan alleen 
de telefoon kosten die 
worden yenaakt. Alle 
informatie d.ie 
GOMPIE/TEL. biedt 
wordt gratis 
verstrekt, zoals d.e 
inlogcode. 



ic===3| 

fcsannanj 

Inaaasal 

ififi 

[L 

„„ona 

an DDDaO 

D "nS§£a 


-- —7 

telesofti-iare, en d.e informatie over 
welïce soort gangbare computer dan 
oofc; van CBM—84 tot groot- mainframe. 

COMPlE-^TEL. "dre-a.it” op een COMFIE- 
TURBO-"FROF+ P.C. Dit 
houdt in: Een 1005; 

IBM— Compa.ti.Jble P.C. 
onder lu Mhs, met 
d.uhbele 360 E.b. 

Floppydisk en 2>c30 
ME. Hard-disk en 
AT-L00K keyboard. 




volgens de PRESTEL— 
norm, dus de normale 
viditel—Jbeller Iran 
altijd, terecht. 

Verder zult TT ook de 
laatste MSS-Gids sien 
uitgeplosen, met de 
eventuele modificaties 
op de grepulbliseerde 
hstmgs uit die Gids. Er is een CHAT— 
mode om met andere gebruikers te 
converseren die tegrelijlc ingelö^d 
hebben. Nu sijn er nog’ slechts 2 
lijnen, waarvan 1 voor de SONY MSX-2, 
mear t.*.t. sal dit worden 
uitgie.breid. 


T F: t p-Mnp 0 piuó E " T 5 L - heeft ook een afdeling 
TE»—HoHOPPING, Udarin alles op het 

computer- en dat-aeebied Mia de databank 
Ken worden besteld. 

Onze eigen 
service— 
dienst is 
voor Uw 
bedr-rjf s— 

installatie 
24 uur 
paraat om 



de even-tuele poblemen Man onze PC's snel 
wit de L*jsf eld te helpen. 

iedere P.C. wordt in Uw werk omgeving 
geirtstalleerd en ook programmeren wij 
sof-tuidr tf die speciaal aan uw wensen is 
af gestemd. Deze pagina is oa. op een 
eenvoudige P.C. gemaakt, en so ziet U dat 
U met weinig middelen toch een goed 
r e-ultaat kan krijgen. 

Onze Teleshop prijzen zijn zeer laag, wat 
d wtl zult merken als U bij ons in de 
databank een kijkje komt nemen, alsmede 
kasten Man het LL.schap; waar 
L-UMF IE> TEI— ook de mogelijkheid voor heeft 
geschapen. 

Dit LL.schap kan op allerlei gebied, zoals 
een databank binnen COMFIE-'TEL., diverse 
informatie en/of advertentie pagina’s; er. 

leoeren Man Software wat- CÖMPiE-'TEL. 
zelf ook tot telesof tware om kan zetten! 

hebben wij ook een door SONY- 
fj^ D §!* k ” ND M ^er beschikking gestelde SOMY- 
HB-F. OOp MbX-2 met TELETRON-monitor aan 
de Compie-PC geschakeld, waarmee we vrij 
van de Pb naar de MSft en terug kunnen 
stur en; en ook hierouer zult U nog Meel 
informatie Minden. Dus als U Man de Hobby- 
Computer naar een PC overstapt behoeven 
de bestandeni niet verloren te gean 

COMPIE/TEL blijft steeds 

weer VERRAZEN(D). 
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TIPS 

Fl-SPIRIT 

Voor deze recente Konamt hebben we diverse 
passwords en tips binnengekregen. Allemaal hartelijk 
bedankt en het password, plus de tips, van H. 
Rubingh zullen we hierbij plaatsen: 

CODE: LJJM DBIP LNMJ GLJD DILE BMJG 

Na het invoeren van deze code hoeft alleen nog de 
laatste ronde van de GP (Australië) gereden te 
worden. Weinig opwindend natuurlijk, maar voor alle 
niet- Game Master- bezitters is het nu mogelijk om 
ook in een vroeg stadium uit alle soorten races een 
keuze te maken. H. Rubingh heeft het spel met de 
volgende combinaties uitgespeeld: 

BODY 2, ENGINE 6 (gebruikt haast geen benzine), 
BRAKE 3, SUSPENSION 3, GEAR 1 (automatic). 

SONY HB-F700P 

Van Harrg Robbertsen ontvingen we een POKE om de 
diskdrive van deze machine sneller te maken. Wel 
vervalt hierdoor de controle (VERIFY), waardoor deze 
drives langzamer zijn dan die van b.v. de Philips 
machines en het is dus niet raadzaam deze controle 
te laten vervallen wanneer b.v. gebruik wordt 
gemaakt van de -goedkopere- ss diskettes op deze 
ds drive; evt. schrijffoutjes worden nu niet meer 
opgemerkt. Met goede ds diskettes komen fouten 
-ook bij de Philips- nauwelijks voor en dan kan de 
POKE best gebruikt worden: 

POKE &HFD9F.201 

Er zijn weer zoveel nieuwe MSX gebruikers 
bijgekomen dat we ook maar weer eens de pokejes 
zullen plaatsen om MSH-1 cassette software op de 
MSK-2 machines (Alle Philips MSX-2 en de SONY 
HB-F700P) te laten draaien. Met deze Pokes -en de 
volgende procedure- zullen vrijwel alle MSX-1 
cassettes op de MSH-2 kunnen draaien. 

1. De computer opstarten met de 
SHIFT-toets ingedrukt. 

2. SCREEN0:WIDTH40 


3a. Voor de Philips: POKE IHFFFF.&HAA 
3b. Voor de SONY: POKE KHFFFF.&HFF 

Tot slot nog een password voor Dragonslager-4: 

ZT < 35 33- LZZL'ö ^ 'ÜUZZ 



dFILOSOFT 

■serieus in software 


DELTA BASIC 

Hoezo slechts 24 K beschikbaar voor Basic? Met DELTA BASIC maakt u 
programma s van 100 tot 10.000 K in Basic! 

Waarom nog verdwalen in een bos van GOSUB-routines? DELTA BASIC 
geeft uw MSX-computer de mogelijkheid van PROCEDURES waarvan u 
zelf een in principe oneindige bibliotheek kunt aanleggen! 

lenTeWINDOWsf mPel? ^ BASIC verschil ' 

DELTA BASIC verlegt de grenzen van MSX-BASIC DELTA BASIC kent het 
gebruik van WINDOWS voor een overzichtelijker en efficiënter beeld- 
sc ermgebruik, de CHAIN-mogelijkheid om vanuit een programma nieu¬ 
we programma's in te laden met behoud van bestaande variabelen het ee- 
bruik van PROCEDURES voor beter en inzichtelijker programmeren, en 
beschikken 3 " 6X1X3 Utllltles waarover elke programmeur reeds lang wilde 
WINDOWS 

WINDOW (definieert window; max. 10 tegelijk mogelijk) 

" (zet cursorpositie binnen window; 10 onzichtbare cursors!) 

- WrKINT (geeft weer binnen window) 

- WINPUT i vraagt input binnen window) j 

- WBOX (zet kader om window) 

- CLS (veegt window schoon) 

- FILL (vult window met letterteken) 

“ ROLL (rolt inhoud window naar boven/onder/links/rechts) 

CHAIN 

- COMMON (legt te bewaren variabelen vast) 

- CHAIN (laadt en runt ander programma, en haalt variabelen terug) 

^ PROCEDURES 

- DEFPROC (geeft begin procedure aan) 

- ENPROC (geeft eind procedure aan) 

- PROC (roept procedure aan) 

- SAVEPROC (bewaart procedure op disk/cass ) 

- dlsk,ca!S ' en koppelt ' m “ n programma) 

PLUS... 

“ TFILES/LTFILES overzicht bestanden op cassette) 

~ AVERIFY (verifieert BASIC-ASCI I bestand op cassette) 

- BVERIFY (verifeert byte-bestand op cassette) 

~ «r» r ~ AUD ' rate voor casse «e-saven tussen 900 en 3000) 

ccTrfrfiwPf LES ^ geeft inhoud disk inclusief lengtes en vrije ruimte) 

- SETDRIVE (selecteert default drive) 

5 S^E R !n««T E . ST ? RESCREEN < bewaart/h “ l ' scherm terug) 

l?D«M?^ E , <maak .t Scherm na bepaakle tijd donker tegen inbranden) 

- SCREEN/OFF (zet scherm aan/uit) 

~ CLEARSPRITES (wist alle sprites) 

- INIPSG (initeert sound-generator. stopt geluid direct) 

- INI FNK (zet functietoetsen terug op originele waarden) 

- KILLBUF (wisttoetsenbord-buffer) 

- GET (pakt eerstvolgende toetsdruk) 

~ PAUSE (wacht bepaalde tijd of tot toetsindruk) 

- CAPSON/OFF (zet hoofdletter-mode aan/uit) 

- POL (kijkt of printer on-line staat) 

- BISET/BIPRINT (selecteert bit-image mode op printer) 

- SCREENDUMP (stuurt beeldscherm naar printer) 

- de inhoud van 2 gebeugenadressen samen; 0-65536) 

“ i nwcB/ Zet ^| tjl 0-65536 in twee opeenvolgende geheugenadressen) 

- LOWER (verzekert kleine letters in string) 

- UPPER (verzekert hoofdketters in string) 

“ STATUS/LST ATUS (geeft overzicht geheugengebruik) 

- UNNEW (haalt programma terug na NEW) 

- FIND (zoekt tekst in BASIC-programma) 

- REPLACE (vervangt tekst in BASIC-programma) 

- MOVLIN (verplaatst BASIC-regels) 

- COPLIN (kopieert BASIC-regels) 

“ f' l ?PJ: TODATA (z6t S e beugeninhoud om in DATA-regels) 

" LSTUN/m'S? 0(OVe : Z,Chtregelnrs - waar GOSUB- s/GOTO’s heenspringen) 

I USTPROOLIJSTPROC(mwzi l chtprocedures)^ R ' i,< ^ ( ^ X, ~ ) SV ° 0rk0rnen ^ 

- LISTVAR/LLISTV AR (overzicht variabelen) 

~ j-jSTTYPE/LLISTTYPE (overzicht variabelen-typeringen) 

L STU«/N ÏcxiTS^ TA ( ° verzicht re S e,nrs ' met DATA-statements) 

I M«™^| L ||JiL S J?/ OVen ! icht adressen door DEFUSFVs aangegeven) 
i SShh™ ( overzicht 'Hscellingen geluidsgenerator) 

LISTSCREEN/LLISTSCREEN (overzicht SCREEN-waarden) 

DELTA BASIC werkt op alle M$X-computers met tenminste 64K geheugen. Het wordt van tevo 
le 6 bleld et f 6n " Cemt Slechts enke,e by tes van de beschikbare BASIC-ruimte af Al- 

la een RE5FT m N P ^rken in SCREEN 0. I en 2. DELTA BASIC blijft in het geheugen ook 

een tvnrfv ET HeC pr °S ra ™ ma heeft een uitgebreide Nederlandstalige handleiding, met natuurlijk 
DELTA BASICktp 11 CC | mma ; do ’j en functies - en tal van voorbeeldprogramma's, 

vcforeerfp^maprogramma° b " UWdealer ' 0,rKht ^bii Filosoft. Profiteervannonlageprijs 

DELTA BASIC 

INFORMATIE 

m^ g n d 77 !^ tiS /° ,d r -T (Vermdd We ' het type van uw computer) d.m.v. een telefoontje 
(050-I 37746) of een briefkaartje naar: FILOSOFT. POSTBUS 1353. 9701 BJ GRONINGEN 
Filosoft produkten zijn verkrijgbaar in iedere goede computerwinkel, maar ook rechtstreeks te 
bestellen door storting van het bedrag + f 3.50 verz.kosten op giro 20792 t.n.v. Filosoft Gronin 

£gvltnZ remb ° Urak “ K " «"» 


disk: ƒ95.- cass.:f89,- 
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GRAHSGH HOOGSTANDJE 


Naam t U8AS 
Lav. i Konami 
Mach. i MSX S 

Prijs! Roapack Fl. 79,58 


Zo langzamerhand zal Konami toch 
Hel het maximale uit de grafische 
mogelijkheden van de MS8-S heb¬ 
ben gehaald, want de beelden bij 
dit programma zijn werkelijk 
schitterend. 


t 


USAS is een echt adventure, 
waarbij de arcade elementen wat 
minder op de voorgrond treden 
dan bij b.v. Metal Gear of The 
Maze Of Galious. Er wordt -afwis¬ 
selend- gespeeld met twee perso¬ 
nages, Wit en Cles, die ieder eigen 
karaktertrekken en vechtkwalitei- 
ten hebben. Met dit duo moeten 
ruines onderzocht worden om 
stukken juweel te bemachtigen en 
-uiteraard- een demon te verslaan. 
Konami zou Konami niet zijn als er 
ergens ook weer niet een prinsesje 
zou opduiken, maar zover zijn we 
nog niet gekomen, dus dat weten 
we nog niet; al doet het plaatje op 
de verpakking wel het een en 
ander vermoeden. 

Er moeten in totaal 5 ruines on¬ 
derzocht worden en elke ruïne 
bestaat uit 4 ruimtes en een 
jr af tombe, die alleen toegankelijk 
s met sleutels. Na het veroveren 
van een ruine krijg je een pass¬ 
word, waarmee ie later verder kan 
spelen zonder helemaal opnieuw te 
beginnen. 

Verder is het het klassieke adven- 
tureverhaal met vreemde tegen¬ 
standers, munten waarmee je ca¬ 
paciteiten kunt kopen en -en dat 
is nieuw- ook emoties kunnen 
worden veranderd door de bijbeho¬ 
rende blokjes (met Japanse te¬ 
kens) aan te raken. Er zijn; 
vrolijk, kwaad, droevig en goed 
humeur en bij elke emotie hoort 
een vechtstijl en een kracht om 
b.v. stenen te verschuiven. In de 
handleiding ontbreekt een be¬ 
schrijving van deze sumbolen, 
maar het gaat om slechts 4 stuks 
en de betekenis is al snel gevon¬ 
den, want de bijbehorende Kracht 
is wel omschreven. 

We kregen dit spel vlak voor het 
ter perse gaan van dit blad bin¬ 
nen, dus we hebben slechts zeer 
kort de tijd gehad om het te 
spelen en weten dan ook nog niet 
wat voor verrassingen het in 
petto heeft. Onze eerste indruk is, 
dat dit spel iets eenvoudiger -of 
liever gezegd iets minder moeilijk- 
is dan Metal Gear, want we hadden 
vrij snel de eerste 'demon' versla¬ 
gen. Op tiet totaal van 16 zegt dit 
nog niet veel en wat er in de 
shrines' gaat gebeuren weten we 
nog niet; dat zal nog wel enkele 
uurtjes vergen. 



Deze cartridge heeft nu eens niet 
de ingebouwde soundchip, maar 
muziek en geluid zijn prima. Gra¬ 
fisch is het een ocnt hoogstandje 
en de beelden zijn dan ook voor¬ 
treffelijk. 

Usas kan niet met de Game Master 
worden gespeeld en dat zal (net 
als bij Metal Gear) wel zijn omdat 
Konami dit jaar met een nieuwe 
Game Master komt. Wel kan Usas 
-volgens de handleiding- worden 
gespeeld met Maze of Galious, Ne- 
mesis2, Fl Spirit of Metal Gear in 
slot 2. *Get readg for a pleasant 
surprise" zegt de handleiding ver¬ 
volgens, maar wat dat inhoudt 
zijn we nog niet te weten geko- 
men. 


Al met al weer een top-spel van 
Konami en er komen er nog een 
stuk of 6 bij dit jaar. ö 

Nog geen hints of tips, want daar 
nebben we het spel te laat voor 
binnengekreaen. We zijn al lang 


lengekregen. 

blij dat we er nog een plaatje "van 
hebben kunnen maken 
hadden we best een 
doorwerken voor over. 


en daar 
Zondagje 


BEELD iiiii 

6EUJID : bbbss 

SPELKWALITEIT: SfiSBS 
DOCUMENTATIE : ssss 
PRIJS : 1888 


46 





































































METAL GEAR 


Hierbij ook de frequenti 
verschillende mensen kan 


es waarop men 
bereiken : 


bij METAL GEAR 


Na onze oproep in bet vorige nummer, betreffende 
Metal Bear, zijn we letterlijk bedolven onder 
inzendingen van tips en telefoontjes; ook van 
■ensen die nog aan het spelen waren. We willen 
hierbij iedereen bedanken die tips heeft 
aangebracht, maar er is er maar altijd 1 de beste, 
en deze inzending kwam van C.Brandsma: keurig 
mtgetgpt met nette tekeningen zodat we alleen naar 
boefden te verkleinen on deze pagina’s in het blad 
te kunnen plaatsen voor al diegenen die nog net dit 
spel aan het worstelen zijn. Bedankt C. en uiteraard 
Krijg j® hiervoor een vergoeding. 


12085 = BIG BOSS 
12091 - DIANE 
12013 - BIG BOSS 
12091 - DIANE 
1202E » MR. SCHNEIDER 
12048 - JENNIFER 


‘3 R ° 'fL OOR, 


JR q o r. 


l &t klooft 



- RATIONS 

- CARD 1 


UERKLARING UAN DE AFKORTINGEN 

BUILDING NR.1 
SECOND FLOOR 


PB - PLASTIC EXPLOSIUES 
GGOGGLES 
P - PARACHUTE 
LM - LANDMINES 
IR - INFRA ROOD STRALEN 
MK - MACHINE GUN KID 



-£/ W ° 'f/.oo.B*. 



3 

1 

3 

LifT 







lm 

' 3 

-P 

IK 


1 

MK 

a 

3 

TJ 

4. 

'I* 


THIRD FLOOR 


GL 

- 

GRENADE LAUNCHER 

MD 

- MINEDETECTOR 

n 

“ 

MISSILES 

M 

- MISSILES 

B 

“ 

BOX (CARDBOARD) 

H 

- HIND-0 

PB 

- 

PLASTIC EXPLOSIUES 


RO 

- 

RATIONS 



C2 

- 

CARD 2 




BASEMENT 


U - UNIFORM 
BA - BODY ARMOR 
SO - SHOOT DUNNER 
F - GREY FOX (FOX HOUNDER) 

E - ELLEN (DOCHTER UAN PETROUITCHJ 
C3 - CARD 3 
BBS - BOMB BLAST SUIT 

Da nummers voor da deuren corresponderen mat de desbetreffende code card. 


OPMERKINGEN: 


“ ï GrBÜ tB hBVrl J d0n roOBt ">en OP da First Floor op het punt 2 ( op da 

kaart > paan staan, waarna men het alarm raoat uitloaaen. Na enige tijd zullen ar 

nRh«<m« e ^»i Wa i : V t u r3 k0fn ü? dia Solid Snaka pevanpen naman. Daarna kamt man in aan 
peheime cal. Links van dia gehBima cel zit Grap Fox, 


” 0m Shoot ounner te varnietigen moet men da rechter 
lippen alle wapens en uitrustingen van Solid Snaka. 
Grenada Launcher Shoot gunnar varnietigen. 


deur openbraken. Hier 
Daarna kan men met de 


Om da Silencer te krijgen moet men op de third Floor 

neerschieten die in het gebouw zijn waar de Grenade Launcher ligt» 


alle uachtera 


- Hind-d is te vernietigen door m.b.v. 
bosturingsruimta meerdere malen te raken. 


da grenade launcher hind-d in de 


- Machina gun kid is te vernietigen m.b.v. mlssiles. 

- Om op de binnenplaats ( courtyard 3 te komen moet men achter Hind-d van het 
dak afsprinpen m.b.v. de parachute. 
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UERKLARING UAN DE AFKORTINGEN 




FIRST FLUOR 


BUILDING NR.2 
SECONO FLOOR 


RO 

- RATIONS 

AD - 

LM 

- LANDMINES 

C - 

BD 

- BULLDOZER 

A - 

A 

- ANTENNA 

P - 

L 

- FLASHLIGHT 


PB 

- PLASTIC EXPLOSIUES 


IR 

- INFRA ROOD STRALEN 



ROOF 


C5 - 

CARD 5 



CDriPASS 
nR. ARNOLD 


Ijpr 

£ 


RD - RATIONS 

PB - PLASTIC EXPLOSIUES 

CG - CARD G 

FT - FIRE TROOPER 

De nummers voor de deuren corresponderen met de deabetreffende code card. 
OPMERKINGEN: 

helder- komBn moBt mB ” uniform aantrekken dat in de 

kelder < basement 3 ligt van gebouw een. 

leggen. tBnk 19 tS VBrnietl 0 Bn door meerdere malen landmines voor de tank te 

T».,nnh 0 ^ U ii d H Ze K tS vernietigen door meerdere malen granaten met de grenade 

launcher op de bulldozer te gooien. " 

I»r,° m r 4 het kom P as c compass 3 te krijgen moet men minstena vier sterren zijn. Als 
LWlïj do°deur ö aperK r °“ t Bn C "»*-»«• U04B , ^ 

- Hr. Arnold is alleen met een racket launcher te vernietigen. Hij heeft CARD B. 

7 rockB J launcher is alleen te krijgen als men op punt Q van de kaart voor 

dl racket; 0 launcher" B " jBnnlfer Dproept < Frequentie 12018 5. Zij zorgt dan ver 

- Fire trooper is te vernietigen door meerdere malen granaten met de grenate 

launcher op firB trooper af te vuren. u 

T H r * Petrovitch wil alleen praten als je zijn dochter Ellen bevrijdt. Deze zit 
in de secret subwag van gebouw twee naar gebouw bbh. Pas op voor de gaten. 

De secret subwag ligt in da basement Cop'de kaart aangegeven met een hokje!. 


1 X 

A 


A 0 

TT 


upr 


ftoo f 





i(D 


. 

mê 


urf 

r ft 


LM 


D * 


¥ ¥ 6 


£/pr 

□ 





ÜFT 

IS 

H 

s 


6eë>ruik 

UUIFoftM 


TANK 


i/cr 


Rü 


PB 


H *0 


staat een zuart hokje met een Cijfer. Dit 
betekent dat de deuren met hezelfde hokje en cijfer aan 
elkaar aansluiten bv. de secret subutay sluit gebouw nr. 1 en 
gebouw nr.H aan elkaar. 

Het deze kaart en het aantal tips moet het volgens mij 

nonriz^ I 2 ic! n ° m nETAL GEAR Uit te spelen. Alleen als het 
ODdzakelijk is zijn de kamers gedetailleerder uitgetekend. 




UERKLARING UAN DE AFKORTINGEN 


BUILDING NR.3 


FIRST FLOOR 
C0 - CARD B 

10th BASEMENT 
OT - OXYGEN TANK 

Da nummer» voor da deuren corresponderen met de desbetreffende code card. 
OPMERKINGEN: 


- Dm de loth basement binnen te komen moet men earst CARD B hebben. Da 2 e ie te 

krijgen door eerst in geboug drie de oxggen tank te halen waarna men waar terug 

moet naar gebouw twee. Hier kan men dan door hat zwarte water. Man koot dan in 
een gadealtB waar man helemaal achterin een deur met CARD 7 ken opanmakan. 

Hierin staat CÜWARD DUCK. Deze moet gedood worden, maar pas op: er zitten ook 

Sen S sSf?rt n ^n D 02B rao 0 an niet gedood worden. Gebeurt dit wei dan verlaagt de rang 
van Solid Snake. Een hoge rang is nodig om Metal Gaar te verniatigBn. W B 

7 r Btal , B ! ar tB vernietigen most men 16 plastic expiosivea aan de voet van 

Metal Gaar laten ontploffen in de volgende volgorde CL-links aan da voet 
R-rechta aan de voet ven METAL GEAR3 < 


■fuir 


ï>lG 

2>oSS 


METAL 

GE AR 


ilFT 


w 


83 


lB 

7 


v/ 

P 

T 

E 

ft 


0® 
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Boso dÖ S ro=kerïainch2r? ^ r ° ckats ■Fschlot.n op do B1„ 

En tenslotte: Neem bij de ontsnapping uit het gebouw de MEEST LINKSE TRAP, 


CBuiLd i Hè,.. tlR o-S 
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Let’s plag graphxcT 

NEOS MS-10 MOUSE & 
GHEESE 



(ROM'pacMe MSX-2 versie) 

(getest door R. Altenburg) 


De MSX computers en dan met name de MSX-2 
versies, worden (gelukkig) niet alleen voor spellen 
gebruikt. Ook grafisch wordt de ZBO in kombinatie 
met de videoprocessor enorm uitgediept en er zyn al 
legio programma s op de markt om het de kunstenaar 
zo gemakkelijk mogelijk te maken. Dat men hiervan in 
Japan ook kaas heeft gegeten, wil men bewijzen met 
de MS-10, een tekenpakket van Nihon Electronics. 

MS-10 biedt de koper een muis, die voor de besturing 
van allerlei programma’s kan worden gebruikt in 
plaats van het voor veel mensen afschrikwekkende 
toetsenbord van de computer. En hoewel er niet zo 
veel software via de muis bestuurd kan worden, is 
het zeker in de MSX wereld toch een beestje met 
toekomst. 

Het rompack dat bij de muis geleverd wordt (er is 
ook een disk- en cassetteversie) wordt verkocht als 
ondersteuning van de muis en niet andersoml Men 
doelt dus duidelijk op het gebruik van de muis in 
kombinatie met andere programma’s. 

De cartridge waarin het tekenprogramma is inge¬ 
bouwd heeft normale afmetingen, die we bij bijv. de 
Konami spellen ook vinden. De konnektor die in een 
slot van de computer wordt geschoven is voorzien 
van een omhulsel, dat na gebruik met behulp van een 
veer over de printplaat heenschuift om beschadigin¬ 
gen te voorkomen. 

De muis van NEOS ziet er degelijk uit en laat zich 
makkelijk bedienen. De grote aktieknoppen zyn niet 
overgevoelig, wat verkeerde akties voorkomt. Er zit 
een snoer aan van ca. 120 cm. wat voor normaal 
gebruik ruim voldoende is. Ik heb vrij veel gewerkt 
met de muis en moet konstateren dat deze niet 
onderdoet voor byv. de muis, die bij de Song 
computers geleverd wordt. De laatste ligt alleen iets 
lekkerder in de hand vanwege de rondingen op de 
hoeken. r 

Als laatste item levert men een handleiding, maar die 
had men beter in Japan kunnen laten om het gezicht 
niet te verliezen. Ik heb bij zo’n mooi programma 
zelden zo n slechte handleiding gezien. De rompack 
versie bevatte de handleiding van de cassette versie 
en nog van de MSX-1 ook. Sorrg hoor, maar wordt de 
koper nu echt niet voor vol aangezien? 

Er wordt in een aantal slordige blaadjes getoond wat 
m.b.v. de software mogelijk is. Mogelijkheden echter, 
die ik nooit terugvond tydens het gebruik van mijn 
versie. Het enige dat juist was, betrof het schoon¬ 
maken van de rubber kogel in de muis. Dit kan echt 
veel beter! 


De schrik te boven gekomen, start ik toch de 
software maar op en ben niet ten onrechte onder da 
indruk van de uitvoer op het scherm: men heeft 
hieraan gelukkig alle zorg besteed. 

Achtereenvolgens toont het scherm: 

- een titelbalk 

- een menu met 22 tekenopties 

- de cursorpositie 

de dikte van de lijn waarmee getekend wordt 

- de zgn. fill patterns (vulpatronen) 

- het tekenvlak 

- de cursor (de vorm van een potlood binnen het 
tekenvlak en van een pyl daarbuiten) 

Het menu werkt als volgt: men wyst met de pyl een 
gewenste funktie aan, drukt op de linker aktieknop 
van de muis en belandt in een submenu. Dit submenu 
toont de betreffende sub-funkties (byv. kleurkeuze 
en lijndikte), de huidige funktie (in de vorm van een 
ikoon), de laatst geselekteerde kleur en het laatst 
geselekteerde vulpatroon. Met de rechter aktieknop 
komt men altijd terug in het hoofdmenu. 

Een eenmaal geselekteerde funktie blijft terugkeren 
als men op de linker aktieknop drukt met de cursor 
buiten het menu. Daarbinnen reageert de knop op de 
positie van de pyl (die intussen een andere dan de 
vorige funktie kan aanwyzen). 

De vulpatronen dienen om een gebied te vullen met 
een bepaald patroon van lynen. punten of andere 
vormen. Dit kan byv. van pas komen als men een 
gebouw tekent en de muren gevuld wil hebben met 
stenen: het gewenste patroon (dat deel uitmaakt van 
de voorgeprogrammeerde patronen) wordt gekozen 
door er 1 aan te wyzen en op de linker aktieknop te 
drukken. Dan kiest men de verf- of vulmode en wijst 
het te vullen vlak aan. Een druk op de linker aktie¬ 
knop zorgt voor de rest. 

De overige funkties zijn in het kort: 

- vrij tekenen gesloten lyn: met de pen kan een lyn 
over het beeld getrokken worden in 15 kleuren. Net 
als in veel andere submenu’s is -naast de tekenkleur- 
ook de kleur van de cursor mutabel (om in een 
gekleurde tekening de cursor niet kwijt te raken) 

- vrij tekenen in dots: als hierboven, maar nu is de 
lyn opgebouwd uit puntjes met ruimte ertussen 

- rechte lijnen: d.m.v. aangeven van begin- en eind¬ 
punt een lyn trekken 
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inkleuren met spuitbus: gekleurde puntjes 'spuiten' 
om een vlak in te vullen 

vierhoek: d.m.v. aangeven linker bovenhoek en 
rechter onderhoek 

- vierhoek ♦ fill: als vierhoek, maar nu wordt het 
vlak direkt ingekleurd 

- cirkel: d.m.v. linker bovenhoek en rechter onder- 

| wordt een vierhoek getoond, waarbinnen een 
cirkel (of elips) wordt getekend 

- cirkel ♦ fill; als cirkel, maar nu wordt het vlak 
direkt ingekleurd 

- paint (verven): vlak inkleuren. Denk hierbij aan het 
goed afsluiten van een vlak. Vergeet men een lijntje 
aan te sluiten by de rest van het vlak, dan 'ont¬ 
snapt de kwast uit het in te kleuren vlak en loopt 
men kans dat de hele tekening geverfd wordt 

tekst: schuine of normale letters afdrukken op de 
positie van de cursor 

- kleur verandering in een vlak: men kan een oude 
kleur opgeven en de kleur waardoor deze vervangen 
moet worden. Zo kan een per ongeluk geel geverfd 
voetbalveld naderhand toch nog groen geverfd 
worden zonder de andere kleuren in de tekening aan 
te tasten 



« r . rr F 11 "”» or kleurenprinter. 

derl rf^ e M<;y 09e ! j v heid de P rinterkodes van een an- 
dere dan MSB printer op te geven. Verder bevat het 

paK&et ook geen vergrotingamogelijkheid naar A4 
(wat Designer van Philips bijv. weer wel heeft). Dat 
had ik nu net nodigl 


- algehele kleurverandering: palet, waarin de 15 
kleuren die in de tekening voorkomen naar eigen 
wens kunnen worden veranderd d.m.v. het toekennen 
van andere Rood Groen Blauw gradaties 

- kopiëren met vergroting/verkleining: het te kopië¬ 
ren gebied aangeven, daarna het bestemmingsgebied. 
Dit laatste mag groter of kleiner zijn dan het bron- 
gebied, de tekening wordt automatisch aangepast aan 
de grootte van het bestemmingsgebied 

- kopiëren: brongebied aangeven, daarna 1 of meerde¬ 
re bestemmingsgebieden 

- aantal dots: voor spuitbus heeft men de keuze 
hoeveel dots per aktie op het scherm mogen worden 
'gespoten' 

- lijndikte: voor het tekenen van vormen kan 
standaard voor een dikkere lijn gekozen worden 

- spiegeling: keuze hoe de lijnen die men tekent 
gespiegeld worden in het vlak, dient voor mooie 
sgmetrische beelden (denk aan spirograph) 

- spiegelen vlak: werkvlak kiezen en dan aangeven 
hoe dit gespiegeld moet worden (bijv. om tekst op z’n 
kant te zetten) 

inverteren vlak: maakt van alle kleuren in het 
werkgebied de inverse kleur 

- loupe: men kiest een werkgebied^e, dat met deze 
funktie wordt uitvergroot. Dit maakt werken op pixel 
(beeldpunt) niveau mogelijkl 

- wissen vlak: geeft op het scherm getoonde teken¬ 
vlak een andere kleur en wist daarmee alle aanwezige 
lijnen 

verschuiven vlak: de tekening die men maakt, past 
niet geheel op het scherm omdat er ruimte voor het 
menu e.d. gereserveerd is. Uil men na enige tijd de 
tekening iets verschuiven om in een ander deel te 
gaan werken, dan kan dat met deze funktie 

- tonen gehele tekening: de menu’s en andere 'obsta¬ 
kels' worden van het scherm verwijderd, zodat de 
hele tekening zichtbaar wordt. In deze mode kan men 
echter niets wijzigen aan de tekening (en dat vind ik 
wel jammer) 


-Mimen manen met net 

programma en ben ook erg tevreden over de presta- 

«kküiHk* mu ! 8 \ De “«"«gestuurde funkties zyn 
gemakkelijk aan te leren en het werken met dit oro- 
gramme is dan ook eenvoudig. ^ 

Behalve de beperkte afdrukmogelijkheden ontbreekt 
er naar mijn mening niets aan dit mooie pakket en 
, J bandleiding dezelfde kwaliteit had als de rest 
zou ik NEOS bijna een 10 kunnen geven. 


Het is jammer dat men zo lang twijfelde over het 
wel of niet importeren van dit produkt, want dat 
had ex M5H-gebruikers kunnen weerhouden van het 
kopen van een computer met zogenaamd meer 
grafische mogelijkheden. 


De weinige nadelen kunt U als tekenliefhebber echter 
wel voor lief nemen. Uat software en hardware 
betreft is de MS-10 zijn F 225,00 zeker waard! 



- laden/achrijven: voor de opslag van tekeningen op 
schyf of cassette (heeft u er geduld voor?) en het 
terughalen van die tekeningen 
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IETS HKKfc ANDERS-. 


Naam i ELITE 
Lav. i Firebird 
Mach. i M8X l&g 
Prijaj CA8. FI. 


59, 


DISK FI. 69, 

Eindelijk weer eens iets geheel 
nieuws op spelgebied voor de MSH. 
Nu eens geen cassette (of disket¬ 
te) met een eenvoudig doosje en 
dito handleidinkje, maar -zoals we 
dat bij andere merken vaak zien- 
een heus softwarepakket, dat be¬ 
staat uit de volgende onderdelen: 

Een forse -full colour- doos, waar¬ 
in de software zit met een aantal 
« Be, !».fraai uitgevoerde toebehoren. 
De Space Traders Flight Training 
Manual is de 64 pagina’s tellende 
(Engelse) handleiding, rijk geïllus¬ 
treerd met een stevige geplastifi¬ 
ceerde kaft. Zonder deze handlei¬ 
ding is het onmogelijk om het spel 
te spelen, dus kennis van de En¬ 
gelse taal is hier een must om 
deze pil door te worstelen. 
Vervolgens de ’Quick Keg Control 
Guide met een (niet helemaal com- 

B leet) overzicht van de toetsen. 

eel makkelijk en zeker niet over¬ 
bodig, daar net spel zo'n 40 ver¬ 
schillende toetsen gebruikt. Ook 
dit onderdeel weer fraai uitge- 
voerd. Eveneens heel mooi is 'The 
park Wheel’, een 48 pagina’s tel¬ 
lend boek, geschreven door Rob 
Holdstock, die hiervoor werd geïn¬ 
spireerd door het spel ELITE. Uit¬ 
eraard ook weer in het Engels. 

Tot slot een full colour poster 
(The Ship Identification fhart’) 
-formaat A3- met een overzicht 
van de ruimteschepen, die in het 
spel voorkomen. 

Het spel is niet speciaal voor de 
MSH ontworpen, dus de beelden en 
de geluiden ziin niet zo mooi als 
we van echte MSH-spellen zijn ge¬ 
wend. De spelkwaliteit is daarente¬ 
gen geweldig. In het speelveld zijn 
de afbeeldingen 3-dimensionaal en 
de bewegingen zijn uitstekend: dat 
maakt weer een neleboel goed van 
de magere graphics. 

Het spel bestaat uit diverse on¬ 
derdelen, welke in dezelfde volgor¬ 
de In de handleiding zijn beschre¬ 
ven: 


1. Navigatie en vliegen. Dit onder¬ 
deel is bijzonder moeilijk, daar alle 
objecten in de ruimte ook werke¬ 
lijk zweven en roteren. Uiteraard 
kom je -af en toe- ook tegenstan¬ 
ders tegen, dus je moet ook nog 
schieten. Je hebt de keuze uit: 
zicht vooruit, linker- en rechter 
zijzicht en achteruitzicht. Voor dB 
besturing kun je klimmen, dalen 
en links- of rechts roteren. Ge¬ 
woon links of rechtsaf is er niet 
bij en dat merk je pas goed bij de 
docking procedure; een hopeloze 
zaak in het begin. Heb je dit -na 
veel pijn en moeite- onder de knie 



(er zijn hiervoor oefenprocedures, 
je hoeft je niet meteen in een hu- 
perwarp te storten) dan kun je, 
via je sterrenkaart, naar een pla¬ 
neet gaan om aan het volgende 
onderdeel te beginnen. 

2. Interplanetarg Travel. Je kunt 
nu gaan reizen, vechten en probe¬ 
ren je schip verder uit te rusten 
voor het volgende onderdeel. 
Klinkt leuk, maar ie ook weer 
waanzinnig lastig, dus dat lukt 
ook niet in een paar avondjes. 

3. Intergalactic Trading. Je kunt 
nu gaan handelen met diverse pla¬ 
neten. Artikelen kopen en verko¬ 
pen, waarbij je moet zorgen winst 
te maken en rekening moet houden 
met de soort artikelen en soort 

S laneten. Sommige producten zijn 
legaal zodat je ook de 'politie’ op 
je dak kunt krijgen en de politie¬ 
ke situatie op de planeten moet je 
ook in de gaten houden. Vooral in 
het begin moet je zeer zorgvuldig 
te werk gaan, want het is zaak zo 
snel mogelijk een goed uitgerust 
schip te krijgen met goede han¬ 
delswaar, een behoorlijke verdedi¬ 
ging en voldoende brandstof om 
ook vergelegen planeten te kunnen 
bezoeken, waar een vette winst 
kan worden gemaakt. 

Het is al een flink verhaal gewor¬ 
den, maar om alles te beschrijven 
zouden we nog heel wat meer 
ruimte nodig hebben (we hebben 
nog medehandelaren, piraten, pre- 
miejagen op piraten, mijnen, dicta¬ 
tors, enz. enz.). Dit beknopte 
verhaal moet echter voldoende 
zi 4P, om de belangstelling op de 
weKken en de rest is allemaal te 
vinden in de forse handleiding 
waar alles zeer uitvoerig wordt 
omschreven en waarin ook allerlei 
tips worden gegeven om bepaalde 
opdrachten tot een redelijk goed 
eind te brengen. 


Lave Mar 


Food 

Texti les: 

Rad i oact i ',-es 

S13MSS 

L i quor-. U i nes 
Luxuries 
Narcotics 
Computers 
Mach in er -m 
m 1 1 oys 
Firearms 
Furs 
Minerals 
Go 1 d 

P1 at i nurn 
Geni-Stones 
Plien Items 


ket Pr-ie 

U n 1 1 



Al met al een zeer interessant 
spel met veel elementen (ik ver¬ 
meld toch nog even dat er meer 
dan 2000 planeten zijn en dat er 
meer dan 20 verschillende ruimte¬ 
schepen rondvliegen) zodat je hier 
heel lang zoet mee bent. Uiteraard 
zit er een mogelijkheid ingebouwd 
om de spelsituatie te saven en 
achterin de handleiding zit een 
logboek waarin je aantekeningen 
kunt maken over de vorderingen 
en de spelsituatie. 

Heb je een diskdrive, koop dan 
voor een tientje meer meteen de 
diskversie, want op cassette wordt 
het weer een slepende zaak. 

Elite is een must voor alle liefheb¬ 
bers van strategiespellen. Ook vele 
adventurefanaten zullen dit spel 
zeer zeker kunnen waarderen, al 
zullen zij misschien het schiet- en 
navigatiewerk wat minder op prijs 
stellen, Dit laatste is echter weer 
heel interessant voor de flightsi- 
mulatorfreaks, dus je moet van 
veel markten thuis zijn om alle 
onderdelen aan te kunnen. 

BEELD iiii 

GELUID : 88 

SPELKHALITEIT: 88888 
DOCUMENTATIE : lliu 
PRIJS 8888 
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JAGK THE NIPPER 8 

Nmi i Coconut Gapers 
Lev. i Braai in 
Mach.i MSX I&£ 

Prijsi CAB. Fl. 32,— 

Dat Gremlln ook nog wel leuke 
spellen uitbrengt, bewijst dit ver¬ 
volg op de avonturen van het 
ondeugende jongetje Jack the 
Nipper. Jackie isTjet land uitgezet 
en pp een vliegtuig naar Australië 
geplaatst. Onderweg weet hij uit 
hel vliegtuig te springen en hij 
Komt (met Behulp van zijn luier 
als parachute) in de jungle 
terecht, alwaar hij vrolijk door¬ 
gaat met zijn streken, 

Een echt doel heeft het spel niet: 
je moet alleen zorgen uit de 
handen van Jack’s vader te 
blijven, die hem uiteraard gevolgd 
Om je in het oerwoud te hand¬ 
haven, ben je uitgerust met wa¬ 
pens, zoals kokosnoten om je bela¬ 
gers mee te verpletteren. Voor 
elke rake klapper worden punten 
gegeven. Verder is er op het 
scherm ook een "Naughtgometer", 
die moet oplopen, als Jack iets 
stouts heeft gedaan. Daarvoor 
vind je in de jungle dingen als 
honing, een ui, houtworm etc. die 
netjes in een vakje verschijnen 
en ook verwisseld worden bij een 
nieuwe vondst, maar hoe ze 

? ebruikt kunnen worden, is mij 
ijdens het spelen niet duidelijk 


geworden. Volgens de handleiding 
zou DOWN samen met FIRE gebruikt 
moeten worden. 

Om zich te verplaatsen kan Jack 
ewoon lopen o? zich via lianen 
ussen de bomen door slingeren. 
Ook kom je rivieren tegen, die met 
vlotjes overgestoken moeten 
worden. Eerst moeten de kroko¬ 
dillen verjaagd worden met kokos¬ 
noten, die echter niet het vlot 
mogen raken. 

Grafisch is dit spel stukken 
mooier dan de eerste Jack the 
Nipper, dat al een succesvol spel 
was. 


Wat het geluid betreft: dit is op 
de Philips MSH-2 erg leuk met een 
vrolijk muziekje tijdens het intro 
en maffe effekten tijdens het 
spelen, maar op de Song HB-F700P 
moet je de geluiden er zelf bij 
maken en is het letterlijk een 
"stom" spel. Dit was trouwens bij 
meer Gremlin spellen het geval. 

BEELD hhhh 

GELUID Hlll 

SPELKUALITEIT: Hlll 
DOCUMENTATIE : Hlll 
PRIJS mi 


Voor de rest is dit niet echt een 
topspel: de graphics zien er nogal 
knullig uit en de bediening is 
moeizaam. Qua geluid is het ook 
niks bijzonders. Voor je 35 piek 
krijg je niet echt waar voor je 
geld. 

BEELD : lil 

GELUID : lil 

SPELKHALITEIT; m 
DOCUMENTATIE : lil 

PRIJS : II 


JIJ BENT BRONSON IN- 

Naam i Daath Ni ah 3 
Lav. i Graal 1n 
Mach. i MSX 1 &£ 

Prijai CAS. Fl. 35,— 

Eigenlijk ben je natuurlijk niet 
Charles Bronson, wiens foto op de 
cover van dit spel prijkt, maar 
Paul Kerseg, de rol die hij speelt 
in de serie Death Wish films. 

Voor diegenen, die deze films niet 
kennen: Kerseg is een z.g. vigi¬ 
lante, iemand die het recht in 
eigen hand neemt en zelfstandig 
het tuig, dat New York onveilig 
maakt, uit de weg ruimt. 

En dat is dus, wat je in dit spel 
moet doen: het bovenste deel van 
het scherm laat zien waar je bent 
en in het onderste gedeelte wordt 
de richting aangegeven, die je 
uitgaat plus de scoretabel en te¬ 
vens een stratenplan, waarop de 

f unten te zien zijn, waar gevoch- 
en wordt en waar je dus heen 
moet gaan. Dan nog een vak, 
waarin je wapens te zien zijn en 
een kogelvrij vest. Hoe meer gaten 
daarin zitten, hoe slechter jij 

eraan toe bent. 


Je moet uitkijken wie je 
neerschiet, want buiten de boeven 
lopen er ook burgers, politie en 
doodgravers rond, die je niet mag 
raken. Het meeste succes boek je, 
als je de gangsterbazen uit de 
weg kunt ruimen, waarvoor je de 
huizen in moet gaan. Door het 
stratenplan van Kleur te laten 
veranderen kun je zien, waar zij 

B redes zitten. 

e huizen moet je ook binnengaan 
om wapens en munitie te vinden, 
want het aantal kogels, waarmee 
je in het begin bent uitgerust, is 
Beperkt. 






































MOEIZAAM 


Naan iMASTERS OF THE UNIVERSE 
Lav. i Graal in 
Mach. i MSX 1&& 

Prijss CAS. F1.32, — 


Mesters of the Unlverse brsngt 
de dodelijke, eeuwigdurende strijd 
tussen goed en kwaad tot leven. 
De prijs is de Sleutel tot het 
reizen In de tijd. Jij, als HE-MAN, 
moet de akkoorden zoeken, die 
samen deze sleutel vormen en Iii 
alleen kunt de Aarde redden van 
de overheersing, als HE-MAN ge¬ 
confronteerd wordt met SKELETOR 
in de strijd om Eternla. Het 
*«tste hoofdstuk, waarin voor 
altijd het lot van de mensheid 
bezegeld zal worden.■ 

Zo staat het beschreven op het 
doosje, met op het omslag een 
prachtige tekening van He-Man en 
Skeletor. 

De handleiding is kort en duidelijk, 
uitgevoerd in het Frans en in het 
Engels. Van dit spel hoeft eens 




Grafisch doet dit spel enigzins 
denken aan titels als "Gunfright", 
Alien 8 etc. zonder het 3-dimen- 
sionale effekt. Qua geluid is er 
ook niets bijzonders te beleven en 
de hele bediening is uiterst moei¬ 
zaam. Na een tijdje spelen had ik 


Hot fleet er om zo snel mogelijk 
alle lokaties te vinden, terwijl je 
onderweg zoveel mogelijk vijanden 
verslaat en de muzieknoten verza¬ 
melt. Je "power" wordt voorgesteld 
door een zwaard, dat steeds kor¬ 
ter wordt, naarmate je wordt ge¬ 
raakt door tegenstanders. In de 
straten zijn Kleine zwaardjes te 
vinden, die Je nodig hebt om je 
power weer op te vijzelen. Let er 
alleen op, dat je ze niet weg¬ 
schiet...... a 


USMJK EENDJE. 


i Howard the Duck 
i Activist on 
i MSX 1&e 
: CAS. Fl. 39,— 


"Quack Fu to the rescue.... Je 
krijgt 1 jetpack, 1 ultralite en 1 
neutron desintegrator. Waarom? 
Omdat je ze nodig hebt. Wat 
gebeurt er als je twee beste 
vrienden verdwijnen? En als ze in 
een aktieve vulkaan worden 
gevangengehouden? En als jij je 
®en weg moet banen over drijf¬ 
zand, kolkende rivieren etc. En als 
jij een eendje bent? Meer span¬ 
ning dan een gemiddelde eend in 
zijn hele leven meemaakt. Maar.... 
hoeveel eenden ken 


jij, die sigaren 


roken?' 


'mutants" moet 


hebben 


. , —- 8M»n van dit software¬ 
huis. En zeker als je net een 
Konami hebt uitgespeeld, is Howard 
the Duck we] een hele grote 
afknapper. ö 

Het enige, dat misschien in het 
voordeel pleit voor dit spel, is dat 
het zeer moeilijk te spelen is. 
naar of je daar nu bijna veertig 
gulden voor neer moet tellen? 

BEELD : II 

GELUID : n 

SPELKWALITEIT: II 
DOCUMENTATIE : mi 


verslaan. 

Er zijn vier spelvarianten, waarbij 
je als beginneling alleen maar door 
de jungle hoeft te raken en als 
expert de vulkaan in moet om de 
"Dark Overlord" te verslaan, die je 
vrienden gevangen houdt. Je 
aantal levens en de moeilijkheids- 

3 raad, waarmee je je tegenstan- 
ers moet verslaan, hangen hier¬ 
mee samen. 

Net als voor Gremlin geldt ook 
voor Activision, dat we in het 


uitgebreide handleiding liegt er 
niet om. Eigenlijk moet je het 
daarbij laten en het spel niet 
opstarten, want dan is de lol er 
meteen af. Knullige tekeningen, 
dito geluidjes en ook hier weer 
?, Bn _? BBr moeiz ame bediening. 
Vandaar waarschijnlijk, (fat zo’n 
jeetje alles wat je moet doen in 
ie handleiding voorgekauwd wordt: 
hoe je over het drijfzand moet 
springen, de rivier moet overste- 


verleden wel eens betere spellen 
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DE MINI GIDS 

In deze rubriek kunnen onze lezers advertenties 
plaatsen, mits NIET VAN COMMERCIËLE AARD! 
Handelaren kunnen onze advertentietarieven aan¬ 
vragen. 

De redactie behoudt zich het recht voor adverten¬ 
ties te weigeren. Inzendingen kunnen gestuurd wor¬ 
den naar Postbus 516, 8200 AM Lelystad en die¬ 
nen voorzien te zijn van naam, adres en evt. tele¬ 
foonnummer. Advertenties met alleen postbusnum¬ 
mer of antwoordnummer worden niet opgenomen. 


AANGEBODEN 

Tfi koop: Philips 64K geheugen uitbreiding R. 125,“. Tévens DMS.L 
8- sporen ree / sequenser (alleen voor Jamaha CX5M) Fl, 125,». 
Mare van Hoof, K. v. Rossumlaan 1, 5645 EC Eindhoven. Tél. 040- 


Philips MSX-LOGO (cartridge + boek) FL 175,» (3500 Bfr.) of ruilen 
tegen GOEDE games. E. Mynsberghe, Houtem 30, 9880 Aalter, 
Balgie. 

MSX1 + diksdrive + datarec. + printer + z/w T.V. + 30 disks + NT1 
mbcursus + div. boeken . Samen Fl. 1650,». Ook apart te koop. Tel. 
055- 668895 (na 18.00 uur). 

MSX1 Spectravideo SVI 728 incl. diskdrive, adapter, joysticks, 
diskettes met spellen en gebr. progr. o.a. Aackosoftw. in box. + 
boeken en cursusprogr. FL 700,» in org. verpakking. Tel. 08365- 


Philips NMS-8220 MSX-2 met 192K Ram 64K Ram, datarec. NMS-1515 
en veel software. Prijs 510,». Tel. 05920- 70188 vragen naar 
Eric 

Sanyo MPC-100 + Sanyo datarec. + ruim 300 spellen enkele org, Fl. 
450,* Marcel Térvelde, Bylakker 15, 8181 TG Heerde. TeL 05782- 
4017 

Toshiba MSX 64K, Altai datarec., joystick. Spellen, 3 boeken, 
kabels, tijdschr., paefs, 5 dataces^ + duur tekenprogr. + div. 
andere progr. half jaar oud in org. verpakking, (wegens school) 
FL 495,». Ml_eurs, Corlaan 23, Blokker. Tel. 02290- 32669. 

Sony HB 75P + diskdrive HBD-50 + Philips datarec. D6450 + zeer 
veel software op disk en cas. + tijdschriften. Wegens aanschaf 
PC. Prijs FL 750,» of 15000 Bfr. Tévens mengpaneel te koop en 
tapedeck p.n.o.tJL Mattheeuws Serge, ’t Hof 67, 8031 Beernem 
(Balgie) TéL 050- 780209. 

VG8020 MSX1 computer, joystick, boek en ca. 500 programma’s. FL 
600,*. AMcek, Europalaan 268, 7543 DM Enschede, Tel. 053- 
772581. 

Wegens verkoop MSX comp. div, org, software en literatuur te 
koop. Mare v. Bramen, Eindhoven. TéL 040- «5332 (alleen tussen 
1900 en £100 uur). 

Ta koop of ruilen org. software voor MSX1 en £ oj. Laydock, 
Vampire Killer, Penguin adv., Metal Gaar, NemesisE, Marcel 
Cevaal, v. Ginkelstr. 34, 4388 NP 0-Souburg. Tel. 01184- 70916 

MSX EproTïi programmer geheel compl. Fl. 300,■ tevens Vampire 
Killer en The Maze of Galious voor Fl. 50,= p.st. (org.). Printer 
merk Smith Corona Fasttext 80 p.n.o.t.k. D. Eggermont. Tel. 01899- 


Fia adni progr. Philips Wie Wat (MSX) org. verpakking (disk) Fl. 
175,=. MT-base org. verp, (disk of tape) Fl. 100,= TeL 04163- 7£137 

Veel software op disk. Prijs var. van Fl. 10,= tot Fl. 40,=. Dennis 
Diepman, Schoolstraat £5, 815£ AR Lemelervald, Tel. 057££- 1841 

Konami cartr. The Maze of Galious FL 50,= of ruilen tegen 
Nemasis 1 of £. J. Willen», Groenewoudlaan 7, 6004 VC Weert. TeL 
04950- £1813 


^ Canon T-££A Msx printer, cass. ree., z/w T.V., 

!^y erwerkar cartrid s e fcomputermates) pji,oA.k. Tal. 03465- 
ooc83 

Software: Avenger 25,». Shark huntar 20,». Starquake 10,= 

Wbart Pruia ’ DS ZwMn 8 ’ 9781 JZ 

Div. software o«, Rivsr Raid, Jack tha Nipper, Future Knight, 
Flight Deck. pjruttJL alles org. Tél. 02998- 1605 (Thies). 

Goldstar MSX, datarec, joyst., HR-5 printer, z/w TV, ruim 400 
progr., boeken en tijdschr. Fl. 850,», Tél. 071- 890140 (na 14.00 
uur, Chris). 

MSX-2 VG-8235 + z/w TV + boeken en bladen + veel software. FL 
950,= Tevens ruilen Metal Gear voor liefst Nemesis-2, R, 
Steyaart teL 01749- 47203 

MSX-1 Philips VG8020 + D6450 datarec + Printer VW0020, alles 
compl met toebeh. en hadl. + arcade Turbo joystick, spellen en 
div. software w. 0 . MT-Base, Aacko-text-II, Aackocalc, aackobase en 
Aackoboek. Tel. 02206- 6003 b.g.g, 02247- 1375 (Tbm). 

MSX-2 Sony HB-F500P + Sony kL mon. (KX-14CP-1) + printer + joyst. 

+ boeken + floppy’s + softw. (org.) alles voor FL 1600,* (in ora. 
verp.) TeL 02297- 3227. u 

Philips VG8235 MSX-2 (ingb. drive) + Philips datarec + org. 
software in een koop FL 750,=. B. Schotanus, Raadhuisstraat 47, 
8561 BH Balk. 

Mitsubishi ME-F80 met veel software (o.a. Roadfighter, Rollerball), 

2 joysticks, 2 datarec. R. 300,= TeL 01802- 1708 (Patrick). 

Philips VGB020 + ca. 200 spellen in org. verpakking Albert Pruis, 
De Zwaan 8, 9781 JZ Bedum. TeL 05900- 12976 

Philips NMS-8245 MSX-2 mat ingb. drive en nieuwste versie Ease 
(1.3) R. 750,». Datarec. D6625 FL 100,=. Samen 799,=. Beiden 1/2 
jaar oud met garantie. TeL 050- 731471 na 18.00 uur (Wim). 

Originele software op cas., disk en cartr. o.a. Vampire killer, 
Kmghtmara), Tél. 020- 903382. 

Originele Devpac assembler op cas. + handl. FL 50,= of ruilen 
tegen Devpac Pascal (cas.) Tal. 08867- 1612 (Jeroen). 

Org. spellen MSX1&2 op disk, tape en cartridge o.a. Metal gear, 
Death wish Hl, Gamesmaster. Tevens Philips G7000 incl. 9 spellen. 
Tél. 055- 551549 (Mark). 

20 org. cas. (o.a. Howard the duck, Batman, Tbpo Europa) van Fl. 

a S ®’* p,st + 1 cart ridge Athletic land FL 25,= TeL 010- 
4129527 (Sanne) tussen 17.00 en 19.00 uur. 

Wegens aanschaf MSX-2: Philips VG802O in goede staat en in org. 
verpakking met veel software + boeken. R. 300,=. Bellen na 18.00 
uuri 034T7- 60013 


disl<ette or 9- FL 50,=, Jaoffry van Esch. TeL 013- 

4££I70, 

MSX-1 Philips VG8020 + diskdrive VY0011 + datarec D6600 + 
diskettes, cassettes, module en handleidingen. (o.a. Database, 
Edrt + spellen) Samen R. 875,= M.de Waal, Veilig Oord 73, 5531 XD 
BladeL Tel, 04977- 3534. 


Goldstar FC200 met JVC diskdrive HCF303 
800,= TeL 070- 212564 


+ datarec. Samen FL 


Phüips VG7000 spelcomputer + 8 modules. Evt ook te ruil tegen 
software. Peter Broers, TeL 05250- 3115 

Philips MSX-2 comp. + Philips monitor + joystick + MSX-Dos + Home 
Qra P hlc da *ign en div. spellen (o.a. Nemesis) FL 950,=. Tel. 
05291- 3588 na 17.00 uur. 
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LISTING CONTROLE PROGRAMMA 2 


DEZE LISTINGTESTER IS VAN TOE¬ 
PASSING OP DE LISTINGS VANAF 
MSX-GIDS NR. 3 

De listingtester is een hulpmiddel voor de lezers die de 
programma’s uit ons blad zelf intikken. Achter de pro¬ 
gramma s, die met deze tester gecontroleerd kunnen 
worden, staat een controletelling. Door nu zo’n pro¬ 
gramma met deze tester te controleren wordt even¬ 
eens een telling verkregen die -per regel- overeen 
moet komen met de telling in het blad. Zijn de getallen 
achter de regelnummers hetzelfde, dan is de kans erq 
groot dat deze regel goed is overgenomen. Zeker is dit 
echter niet, want wanneer bijvoorbeeld twee letters in 
een regel worden omgewisseld dan is de telling wel 
goed, maar kan het programma toch fouten opleveren. 

WERKWIJZE 

Eerst moet dit controleprogramma FOUTLOOS over¬ 
genomen worden en worden weggeschreven op cas¬ 
sette of diskette als ASCII-file met de volqende 
opdrachten: a 

SAVE”CAS:TESTER”, A (voor cassette). 

SAVE”A:TESTER”,A (voor diskette). 

Dit hoeft slechts éénmaal te gebeuren; verder kan dit 
programma voor alle listings worden gebruikt. 

Vervolgens moet het te controleren programma wor¬ 
den ingetikt. Is dit gedaan, dan het programma eerst 
wegschrijven naar cassette of diskette en niet eerst 
RUNen, want bij sommige fouten kan het programma 
blijven hangen en bent u het kwijt; alles moet dan 
opnieuw worden ingetikt. Nu kan het controleprogram¬ 
ma worden ingelezen en achter het te controleren pro¬ 
gramma worden geplaatst met de opdracht: 

MERGE”CAS:TESTER” (voor cassette). 

M ERGE”A:TESTER” (voor diskette). 

Vervolgens kan de controle worden gestart met: 

RUN 65000. 

Let erop de fouten te corrigeren in het originele pro- 
gramma. Na het laden van het controleprogramma 
staat dit namelijk achter het eigenlijke programma en 
vormt nu één geheel. In sommige gevallen kan dit extra 
stuk programma problemen geven b.v. met de qeheu- 
genruimte! a 


REM-regels worden niet gecontroleerd. Mocht het 
voorkomen dat REM-regels wel exact moeten worden 
overgenomen, dan zal dit bij het desbetreffende pro¬ 
gramma worden vermeld. Bij kleine of eenvoudige pro¬ 
gramma’s wordt geen controletelling geplaatst. Ook 
worden meestal geen tellingen geplaatst bij program¬ 
ma’s die deel uitmaken van een artikel. Deze program¬ 
ma’s (of stukken programma) verschijnen ook meestal 
niet op de cassette of diskette van de programma-ser- 
vice. 


Sommige programma’s hebben een eigen controle Bij 
deze programma’s ontbreekt de controletelling of staat 
slechts een telling voor het gedeelte dat niet door het 
programma zelf wordt gecontroleerd. 

(Meestal BASIC-gedeeltes bij een machinetaal pro¬ 
gramma). 


65000 

65010 

65020 

65030 

65040 

65050 

65060 

65070 

INT 


’ *******##*#*#*#**###### 

=■ * LISTING TESTER 2 * 

# Door Al-f red Debels * 

' * <0 1986 De MSX Gids * 

* Amsterdam # 

*********************** 

CLSsCLEAR:SCREEN 0:WIDTH 40:PR 


6_>080 PRINT "Weergave via beeldscher 
m o-f printer?" 

65090 PRINT : PRINT "B o-f p?: •• 

65100 X$=INKEY$:IF X$<>"B" AND X$<"'-" 
P" THEN 65100 


65110 START=32769 ! 

65120 RG=START+2: ’ T=0 

65140 VR=PEEK(START)+256#PEEK(START+ 


do uk» iNr<=t-fcfcK (KB) +Z56*PEEK (RG+1) 
65160 IF VR=0 THEN 65290 
65170 IF NR>=65000! THEN 65290 
65180 S=0:FOR I=RG+2 TO VR-1 
65190 A=PEEK(I) 

£5210 I F A==143 THEN I=VR: GOTO 65240 
652o0 S= S+A:NEXT 
65240 S=SM0D256 
65250 T=T+S 

65260 IF X$="B" THEN PRINT USING "Re 
gel:##### - ###";NR,S:GOTO 65280 

^ PRINT DSING "Regel:##### - ## 
tt NK i| S 

65280 START=VR: RG=VR+2:G0T0 65140 
65290 IF X*="P" THEN 65310 

F'RINT: PRINT "Totaal: ";T: END 
6o310 LPRINT "Totaal: ";T: END 


Er staat geen 'zelftest’ meer bij dit controleprogramma 
daar er afwijkingen in de telling kunnen voorkomen 
wanneer de controle via het beeldscherm plaatsvindt 
of wanneer het programma al een keer is geRUNd. Om 
dezelfde reden dient het te controleren programma ook 
alleen ingeladen te worden voor de controle en moet 
men NIET eerst RUN geven. Na het RUNen zal de con¬ 
trole - bij sommige regels - een andere waarde geven!! 

Let goed op de DATA-regels. Hier worden de meeste 
fouten gemaakt. Bij het omwisselen van getallen in 
deze DATAregels wordt wel een juiste telling gegeven 
maar het programma zal niet (of onjuist) werken! 







T.k. Konami Roms: Metal Gaar en Maze of Galious evt. ook R Spirit 

- 'S?* r ' Roy Wessels ’ Heikampseweg 4, 6603 KB Wijchen. 
Tel. 08894- 13335. 

VG8230, nog geen 3 maanden oud in org. verpakking. 
Tal. 078- 143358 (na 1730 uur). 

Philips VG8020 + stofhoes + Philips datarec. + adapter + Philips 
KUnon. CM8500 + Phüips joystick en veel software, boeken, MSX 
Gidsen en Ned. handleiding. Alles 1 jaar oud. FL 900,- R. Walstijn, 
Noordeinde 83, 1658 CD Lambertschaag TeL 02298- 1728. 

Wegens aanschaf PO Phüips VG8230 (MSX-2) + Philips CM8533 kl. 
mon. + software, div. boeken en tijdschriftea Fl. 1250,=. R.G. Smit, 
Patrijspoort 32, Amstelveen. Tel. 020- 473278 

Wegens aanschaf MSX-2: Sony HB75P + datarec. + veel software. 
Tal. 01650- 57806. 


GEVRAAGD 

Wie heeft er een 64K of 128K gehaugenuitbr. voor mij. B. 
Schotanus, Raadhuisstr. 47, 8561 BH Balk. 

BASIC compiler v.d. firma Bialke- Berendsen- Reiman uit Ahrens- 
burg. Schrijf naar: Huub Timmermans, Beemderhoekweg 2, 6095 
NS Baexam. 

Gezocht cartridge back-up programma uit MSX-Gids nr. 11. J.J. 
Vermeulen, Adm. de Ruyterlaan 160,1215 NE Hilversum. 

Gezocht Konami’s op cartridge, alleen origineel en compleet en 
org. MT-Base. Tevens MSX-ers om software mee te ruilen (MSX1 
en 2 alleen op disk). Tel. 01660- 3825. 

Gezocht MSX-Gids 10 en 11. A. Pistoor, Dotterbloem 47, 1441 TK 
Purmerend. 

Gezocht listing back-up programma uit Gids nr. 1L Jan Bakker 
Tel. 05210- 77555 

Gezocht rompack backupper uit nr. 11 Tal. 070- 85751 na 18.00 
uur. (tegen verg.) 

Een diskdrive voor MSX-! en tevens gezocht het progr. EDDY-2 of 
soortgelijk progr. K Siemonsma, Volendamstraat 109, 8304 CE 
Emmeloord. TeL 05270- 97416 

Een BASIC compüer / Delta BASIC op disk tegen vergoeding of 
ruil. Tevens te ruü gevr. MSX spellen op disk. Rowald Zijlstra, 
Westersingel 49, 9251 HG Bergum. 

MSX-Gids nr.11 of alleen da listing 'Rompack backupper’ tegen 
redeüjke vergoeding of ruüen tegen software. Tevens kontakt 
gezocht met MSX-ers 1&2 om software (disk en tape) mee uit te 
wisselea Bellen na 16.00 uur. M. Imansa, Margrietlaan 5, 3851 RS 
Ermelo TeL 03417- 60013. 

Gevraagd org. Konami megaroms te ruü tegen MSX-1&2 software 
op disk. Bastiaan Brassien, Brederostr. 76, 8023 AV Zwolle Tel. 
038- 539625 

Gevr. MSX- Gidsen 1,5 en 6 (org.) TeL 05282- 1212 (Rene). 

Gevr. MSX printer. TeL 01650- 57806. 

Wie kan mij alle listings (b.v. fotokopie) bezorgen van MSX-Gids 1 
t/m 12. Kosten worden vergoed. Bestaat er ook een MSX club in 
het Mechelse? De Weert Jean-Pierre, Kruisbaen 36 bus 201, 2800 
Mechelen (Belgie). TeL 015- 413530 na 18.00 uur. 


DIVERSEN 

G®zocht MSX1&2 gebruikers voor uitwisseling van programma’s 
en/of kennis. Eindhoven Tel. 040- 125307. 

Gezocht mensen voor MSX club. Voor meerdere informatie, bel! 
08380- 36393 (Marco). U kunt ook schrijven naarj M. Landman, 
Opveld 8, 6715 GK Ede. Vermeld hierbij duidelijk uw naam, adres 
en telefoonnummer. 


RUILEN 

Allerlei spellen op disk voor beginnend MSX-er evt. ruilen tegen 

< aa ' Kni fl htn » r *> Hole in one, Skyjaguar! 
Roadfighter en Kings Vaüey). Wim Lodder, Brasem 55, 2986 HA 
Ridderkerk. TeL 01804- 23870 

Welke MSX-ers uit de omg van Venray zouden met mij software 
willen ruüen? TeL 04780- 84437 na 18.00 uur, vragen naar Rob. 

Wie wü t pallet jas ruüen en heeft Green Baret, Zomargamas, 
Wintergames M. spellen. Schrijf naar Bauke v.d. Waard, 
Harlingerweg 46, Franeker. 

° f j'®* 1 “«ware op disk. B. Schotanus, Raadhuisstr. 47, 
oh balk. 

Gezocht DISKIT + handL of Hydlide of The Maze of Galious in ruü 
voor Goonies, Skyjaguar, Pinguin adv., Schaken, Music editor of 

T>L" 01738 ? 9572 r ' ^ I8 '®® UUr en vragen n * ar Arno. 

Gezocht MSX-ers om software mee te ruüen. Kaith Rongen, 
Oostrum. TeL 04780- 86744. * 

Te koop of H ruil o* Metal Gaar (Rom). D. Grunk, 
Penmngkruidweg 30, 8042 NR Zwolle. Tel. 038- 221197 

03418^ 52318** PUÜ! MSX ” 2 sp * U " n / Programma’s op disk. Tel. 

GezTCht Armymoves, Livingstone en poLac-1 tegen andere 
star, Mecross, Til, ne 18,00 uur 010- 4290943 

Martianoids en Zoids te ruü tegen Arkanoid of Penguin 
adv. R. Opdenkamp, Tel. 010- 4855749 (Remco, na 18.00 uur). 

“«^r* "*■ te ruüen omg. Steenwijk. Jan Bakker, 

IBL 05210— 7/555 

MSX-l en 2 software te ruü of te koop. Oa. div. Konami’s en 
andere speüen (disk). R. Hoffenreuter, Asterstraat 61, 2565 TS 
Den Haag. 

Spellen te ruil of te koop. 0.a. Yie ar kung fu 2, Faud, Police 
academy, Invaders en Future Knight. Henk- Jan Leusink, 
Paulinastraat 77, 7555 JV Hengelo. TeL 074- 425058 (na 18.00 
uur), 

Software te ruil, of te koop tegen kleine vergoeding. E. Hetem, 
Reitzstraat 92, 2021 TV Haarlem, Tel. 023- 257016 

MSX-ers gezocht om software mee te ruüen (tape) E. van der 
Wük, Saffier 7, 2691 TK ’s-Gravenzande. 

Kontakt gezocht met MSX-ers om software en serieuze proor. te 
Tav * n ® MUSIX ® n FUZZBALL voor FL 15,= p.st. TeL 01892- 

12881. 

Gavraagd org, megaroms Konami ruüen tegen MSX-l en 2 softw. 
op disk. 03418- 52318 (Berend). 

Gevraagd megaroms e*. cartridges ruilen tegen progr. op 
tape/disk. Tevens ruüen progr. op disk/tape. Tel. 055- 551549 
(Mark). 

MSX 1&2 gebruikers gezocht om software te ruüen op disk. 
Pascal Holthuysan, Merelweg 24, 5915 BT Venlo. TeL 077- 540244. 

HS*"®"* Ö8® om software te ruüeni disk en tape. Ben Haverkot- 
te, Pr. Marijkelaan 12, 7776 XE Slagharea Tel. 05231- 1607 

a cartridge Supercobra en de org. tapes Compüation 1 

??,5 ai h l G QrdQa wil dit ruilen tegen Nemesis? TeL 

05427- 2384. 

-ï 1 * oftw * r * ta ruÜBn Bezocht. E Schoneveld, Vuurdans 
12, 2907 RJ Capeüe a/d IJssel. 

In omg Sneek MSX-ers gezocht voor softwareruü. TeL 05150- 
1757L 

MSX-1&2 gebruikers gezocht om software ta ruüen op disk. R, 
ver allo, Landstrekenleen 105, 5235 LL ’s-Hertogenbosch. 

Software te ruü op tape. TeL 04138- 72180 na 1E00 uur (Halter). 




let op ! let op ! let op ! let op ! 



op 16 april is het weer zover 
dan organiseert the softshop weer 
een landelijke msx dag in amsterdam 


met medewerking van de msx gids , 
mozaik en electronics nederland 
en a.g.s software the softshop 



het adres is gebouw de arend 
eerste breeuwerstraat 13 
te amsterdam 

bel voor informatie onze winkel 
de zaal is open van 10.00 t/m 17.00 uur 
bereikbaar met tramlijn 3 
en diversen buslijnen vanaf centraalstation 



witte de withstraat 22a 
1057 xw amsterdam 
tel : 020-123206 













> : £ 1 

witte de withstraat 22a 
10S7 xw amsterdam 
tel :020-123206 


TENNIS KONAMI 

PING PONG KONAMI 

SKY JAGUAR KONAMI 

TIME PILOT KONAMI 

FOOTBALL KONAMI 

TRACK FIELD I KONAMI 
TRACK FIELD II KONAMI 
HYPER SPORT 3 KONAMI 
ROAD FIGHTER KONAMI 
HYPER RALLY KONAMI 

GOONIES KONAMI 

KNIGHTMARE KONAMI 

KINGS VALLEY KONAMI 
MONKEY ACEDEMI KONAMI 
YIE AR KUNGFU I KONAMI 
YIEAR KUNGFU II KONAMI 
NEMESIS I KONAMI 

NEMESIS II KONAMI 

VAMPIRE KILLER KONAMI 
METALGEAR MS H 2 KONAMI 
PENGUIN ADV. KONAMI 

GAME MASTER KONAMI 

QUBERT KONAMI 

F1 SPIRIT KONAMI 

INSPECTEUR Z HAL 
ROVING PLANETS HAL 
RAMBO HAL 

RAMBO SPEC MS H 2 HAL 
DUNKSHOT HAL 


FL 

69.50 

KASTAN 

STARK 

FL 

149.00 

FL 

69.50 

FISTAN 

STARK 

FL 

299. 00 

FL 

6 9.50 

F AS TAN 

STARK 

FL 

299. 00 

FL 

69.50 

SUPERKASBOEK 

STARK 

FL 

149. 00 

FL 

69.50 

SNELFAKTUUR 

STARK 

FL 

149.00 

FL 

6 9.50 

FLASH 

STARK 

FL 

119.00 

FL 

69. 50 

TASWORD CAS 

F I L 0 

FL 

9 5.00 

FL 

6 9.50 

TASWORD DISK 

FI LO 

FL 

115. 00 

FL 

69.50 

TASWORD MS H 2 

F I L 0 

FL 

149.00 

FL 

69.50 

C-COMPILER 

Hl SOFT 

FL 

165.00 

FL 

6 9.50 

PASCAL 

Hl SOFT 

FL 

165.00 

FL 

69.50 

DEVPAC 

Hl SOFT 

FL 

165.00 

FL 

69.50 

MS H C AL C 

COMP 

FL 

195.00 

FL 

49.50 

MS K TEKT 

COMP 

FL 

195.00 

FL 

6 9.50 

RADARSOFT 

C ASS. 

FL 

19.90 

FL 

69.50 

MT-BASE 

MT 

FL 

199.00 

FL 

6 9.50 

EDDY II 

HAL 

FL 

5 9.50 

FL 

79.50 

PUDDLES 


FL 

4 5.00 

FL 

79.50 

DISKIT 

FI LO 

FL 

6 9.00 

FL 

79.50 

D. T. P 

RADAR 

FL 

149.00 

FL 

79.50 

MT VIDITEL 

MT 

FL 

299.00 

FL 

79.50 

MUE 


FL 

9 9.00 

FL 

79.50 

PRINT EHPRESS 


FL 

9 9.00 

FL 

79.50 





FL 

79.50 

ADVENTURE 




FL 

79.50 

L,AFFAIRE 


FL 

6 9.00 

FL 

89.50 

GNOME RANGER 


FL 

4 5.00 

FL 

99. 50 

ADRIAN MOLE 


FL 

49. 00 

FL 

5 9.00 

CASTLE BLACKSTAR 

FL 

25.00 


HAL 

HAL 

HAL 


EGGERLAND 
EGGERLAND 2 

FRUIT SEARCH _ 

HOLE IN ONESPEC HAL 
TURBO 5000 
MS K DOS 
ELITE 

SILICON DREAMS LEVEL 
JEWELS DARKNES LEVEL 
KNIGHT ORC 
KINDEREN V/D WIND 
I NHERITANCE 
WORM IN PARADISE 
DIVERSEN LEVEL 9 


FL 
FL 
FL 
FL 

ROBTEK FL 
PHILIPS FL 
F I RE 


LEVEL 


FL 

FL 

FL 

FL 

FL 

FL 

FL 

FL 


69.50 

79.50 
45.00 
79.50 

119.00 
165.00 
59.00 
65.00 
6 5.00 
65.00 
99.00 
45.00 
45.00 
49.00 


LET OP ALLEEN VOOR SCHOLEN 
TAFELS TOT 99 
PUNTSOM TOT 999 
DIKTEE MOORDEN 
VRAAG PRIJSOPGAAF 

DIVERSEN EDUCATIEF 

ASCHCOM REKENEN 
ASCHCOM TAAL 
ASCHCOM ENGELSE WOORDEN 
EN NOG VELE ANDERE 


Bestelbon 


Titels 


Prijs 


Vooruit per giro: 4526682 / 4,-porto . /. 

Euro/betaalcheque f 4-porto . /. 

Rembours f 10,—porto . ƒ. 


Naam 

Adres 

Postcode 

Woonplaats 

Telefoon 


Totaal 

Porto 

Totaal te voldoen 


ƒ 

ƒ 

ƒ 

























